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Lincoln  Laboratory  Multi -Programming  Supervisor 


Abstract 


A  supervisor  program  has  been  written  for  the  IBM  System/360  which  allows  the 
multi -programming  of  several  jobs,  each  with  its  own  input-output  requirements. 

A  job  program  operates  in  problem  state,  and  realizes  all  of  its  input/output 
demands  through  supervisor  calls.  I/O  operations  of  one  job  are  overlapped  with 
those  of  other  jobs,  and  can  also  be  overlapped  within  a  single  job.  Each  job  is  written 
completely  independent  of  all  other  jobs.  A  job  is  initiated  by  a  request  typed  on  the 
console  typewriter  and  runs,  with  frequent  I/O  waits,  until  it  calls  for  its  own  termina¬ 
tion,  or  is  terminated  by  the  operator  via  the  console  typewriter.  During  the  operation 
of  the  supervisor,  a  job  can  be  initiated,  can  terminate,  and  can  be  re-initiated  as  often 
as  desired. 

All  jobs  reside  in  core  together  with  the  supervisor.  To  minimize  space,  buffers 
are  assigned  at  the  initiation  of  a  job  and  are  released  upon  termination.  Job  programs 
may  be  written  as  re-entrant,  whereby  a  single  copy  of  a  job  program  can  be  active  for 
more  than  one  task.  Re-entrant  jobs,  thus,  have  different  buffer  areas  for  each  dis¬ 
tinct  initiation. 

When  a  job  is  started,  the  operator  specifies  the  I/O  devices  required  (e.  g.  ,  a 
particular  printer  and  tape  unit  for  a  print  job),  and  any  initial  parameters  desired 
(e.  g.  ,  tape  density  setting,  instructions  to  skip  to  a  specified  listing,  instructions  to 
stop  after  a  tape  mark,  and  so  forth).  The  job  is  then  started  if  the  requisite  I/O  devices 
and  buffers  are  available.  The  I/O  devices  remain  assigned  to  that  job  until  it  terminates. 
However,  at  any  time  a  job  can  issue  messages  to  the  operator  via  the  console  typewriter. 

Multi -programming  is  achieved  by  central  handling  of  I/O,  and  by  the  fact  that  the 
jobs  run  are,  in  every  case,  I/O  bound.  Thus,  while  a  job  is  waiting  on  I/O,  other  jobs 
can  make  use  of  the  central  processor.  When  an  I/O  device  has  completed  its  operation, 
the  job  which  started  the  I/O  operation,  through  a  supervisor  call,  is  permitted  to 
continue. 

No  standard  device  error -recovery  routines  are  built  into  the  supervisor,  but  a 
family  of  subroutines  is  developing  which  jobs  can  call  upon  to  provide  error  recovery. 
Unit  check  and  unit  exception  indications  are  provided  to  the  job  at  the  time  the  job  exe¬ 
cutes  the  supervisor  call  to  wait  on  a  device. 
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The  conventions  which  a  job  program  must  follow  deal  with  supervisor  call 
calling  sequences  since  it  cannot  use  privileged  instructions.  A  job  controls  its 
input/output  by  issuing  a  supervisor  call  to  execute  a  channel  command.  (Command 
chaining,  data  chaining,  and  TICing  are  allowed,  but  PCI's  are  prohibited. )  If  certain 
suggestions  are  followed  in  the  writing  of  channel  programs,  the  system's  efficiency 
is  improved;  however,  the  supervisor  does  no  policing  of  channel  programs.  Errors 
committed  in  the  running  of  a  job  cause  the  job  to  be  terminated  with  a  job  dump. 
Storage  protection  is  not  used  and  thus  one  cannot  guard  against  all  errors;  hence,  all 
job  programs  should  be  debugged  before  they  are  included  in  the  system. 

Some  of  the  jobs  included  in  the  system  are: 

1.  System  Jobs  -  To  list  the  jobs  in  the  system,  to  list  the 
active  jobs,  i.  e.  ,  tasks,  or  to  terminate  an  active  job. 

2.  Tape  Move  Jobs  -  Skips  files  or  records  either  forward 
or  backward  as  desired. 


3.  Prestore  Job  -  Places  BCD  or  binary  card  images  onto 
tape  with  standard  look-ahead  characters. 

4.  Print  Job  -  Reads,  deblocks,  and  prints  a  BCD  tape  with 
Fortran  carriage  control  characters. 

5.  Punch  Job  -  Reads,  deblocks,  and  punches  card  images 
from  tape. 

6.  Tape  Copy  and  Compare  -  Copies  and  compares  a  mixed 
mode  tape  of  any  density7. 

7.  Tape  Dump  Jobs  -  Dumps  a  7-track  tape  in  BCD  or  octal 
format  or  a  9 -track  tape  in  hexidecimal  or  EBCDIC. 

8.  System  Dump  Jobs  -  Produces  a  core  dump  of  a  job  program, 
I/O  interrupts,  or  all  of  core  storage  as  desired. 


Accepted  for  the  Air  Force 

Franklin  C.  Hudson 

Chief,  Lincoln  Laboratory  Office 
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A.  Suggested  Procedures 


The  distribution  tape  has  been  designed  for  use  with  a  System/360  model  40; 
however,  any  machine  capable  of  reading  a  7-track  tape  of  standard  density  can  be 
used  to  obtain  printouts  of  the  listings  and  source  decks.  All  files  but  the  first  are 
recorded  with  even  parity,  in  standard  BCD  mode,  and  at  the  density  specified  on  the 
tape  label.  The  first  file,  however,  is  recorded  at  800  bpi,  with  data  converter  on, 
and  contains  the  object  decks  and  control  cards  forming  a  self-loading  module.  It  is 
intended  for  use  as  the  operating  system. 

If  a  System/360  model  40  is  available  with  devices  attached  having  the  same 
addresses  as  those  in  the  distribution  tape,  the  system  may  be  loaded  by  mounting 
the  distribution  tape  on  a  tape  drive,  dialing  the  load  switches  to  the  tape  unit,  and 
pressing  the  IPL  button.  On  normal  completion  of  loading,  a  message  identifying 
the  current  system  will  be  printed  on  the  console  typewriter.  A  request  can  then 
be  made  to  initiate  any  desired  task.  A  console  listing  of  all  jobs  available  in  the 
system  can  be  obtained  by  initiating  the  'JOBS’  task.  A  listing  of  the  supervisor 
and  its  subprograms,  as  well  as  the  job  programs,  can  then  be  obtained  by  initiating 
the  'PRINT'  task  as  follows: 

PRINT  PTRp  Txxx 

where  'PTRp'  is  'PTRE'  or  'PTRF'  according  to  which  printer  is  to  be  used,  and 
'Txxx'  identifies  the  tape  unit  in  which  the  system  tape  is  mounted.  Normal  comple¬ 
tion  of  printing  will  be  indicated  by  the  message  'END  OF  JOBS'  .  At  this  point,  the 
'PRINT'  task  can  be  terminated  using  the  TERM  task  as  follows,  where  n  is  the 
PRINT  task  number: 


TERM  n  . 

The  source  card  can  then  be  printed  or  punched  by  issuing  one  of  the  following  tasks: 

For  printing  -  PRINT  PTRp  Txxx  END 

For  punching  -  PUNCH  Txxx  END  . 

Again,  normal  completion  of  the  task  will  be  indicated  by  the  message 
'END  OF  JOBS’  . 

If  the  device  addresses  do  not  correspond  to  those  of  the  distribution  tape,  core 
patches  can  be  made  to  alter  the  device  addresses. 

If  a  System/360  model  40  is  not  available,  all  files  of  the  distribution  tape, 
except  the  first  should  be  printed  or  punched  using  some  other  machine. 
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B.  The  Distribution  Tape 


The  distribution  tape  contains  77  files  as  indicated  below.  All  files,  except  the 
first,  are  recorded  with  even  parity,  in  standard  BCD  mode,  and  at  the  density  speci¬ 
fied  on  the  tape  label.  The  first  file,  however,  is  recorded  at  800  bpi  with  data  converter 
on.  Files  49  and  50  are  separated  by  three  tape  marks  (EOF's). 


File  1 

File  2 

File  3-10 


File  11-13 


File  14 
File  15-27 


File  28-49 

File  50 
File  51 
File  52-59 
File  60-62 
File  63 
File  64-76 
File  77 


Loadable  system  including  BPS  loader,  BPS  single 
phase  dump,  supervisor  object  decks,  job  object 
decks,  and  the  necessary  BPS  control  cards  for 
loading  into  a  65K  byte  IBM  System/360  Model  40. 

Assembly  listing  of  the  main  supervisor  system  program, 
SUPER. 

Assembly  listing  of  the  8  supervisor  subprograms 
BUFFER  FNDJTL  EXIT 

TABLES  FIDCQ  JBRP 

BUFFS  FBJTJL 

Assembly  listing  of  the  job  program  subroutines 
TPSUBR 
CARDUC 
TAPEUC 

Assembly  listing  of  the  TERM  Job. 

Assembly  listing  of  13job  programs. 

JOBS  TPMOVE  (8)  TPCOPY 

TASKS  CARDTP  T7DUMP 

JOBDMP  PRINT  T9DUMP 

LOWCOR  PUNCH  LABEL 

CORDMP 

Assembly  listing  of  the  Joblist  subprograms  for  all  20  jobs 
plus  the  subprograms  FSTJOB  and  LSTJOB. 

Source  cards  from  the  Model  40  Equalities  deck. 

Source  cards  for  the  main  supervisor  system,  SUPER. 

Source  cards  of  the  8  supervisor  subprograms. 

Source  cards  of  the  job  program  subroutines. 

Source  cards  for  the  TERM  Job. 

Source  cards  for  the  13  job  programs. 

Source  cards  for  the  Joblist  decks  including  FSTJOB  and 
LSTJOB. 
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The  system,  as  distributed,  is  assembled  for  the  Lincoln  Laboratory 
configuration  and  device  addresses.  The  devices,  their  addresses,  and  halfword 
device  address  patch  locations  are  listed  below. 


Device 

Channel  0  Devices 

2540  Card  Reader 
2540  Card  Punch 
1403  Printer 
1403  Printer 
Calcomp  Plotter 
Cal  comp  Plotter 
2701  Parallel  Data  Adapter 
2741  Typewriter  Terminal 
2741  Typewriter  Terminal 
2741  Typewriter  Terminal 
2741  Typewriter  Terminal 
2741  Typewriter  Terminal 
2741  Typewriter  Terminal 
2250  Display  Scope 
2260  Display  Terminal 
2260  Display  Terminal 

Channel  1  Devices 

7-Track  Tape 
7-Track  Tape 
7 -Track  Tape 
9- Track  Tape 
9-Track  Tape 
9- Track  Tape 

Channel  2  Devices 

9- Track  Tape 
7-Track  Tape 
7-Track  Tape 
7-Track  Tape 
7-Track  Tape 
7-Track  Tape 


Address  Relative  Patch  Address 

in  TABLES  Subprogram 


000C 
000D 
000E 
000  F 
0020 
0021 
0022 
FFFF 
FFFF 
FFFF 
FFFF 
FFFF 
FFFF 
FFFF 
FFFF 
FFFF 


0180 

0181 

0182 

0183 

0184 

0185 


0280 

0281 

0282 

0283 

0284 

0285 


000880 

0008A4 

000 8C8 

0008EC 

000910 

000934 

000958 

00097C 

0009A0 

0009C4 

0009E8 

000A0C 

000A30 

000A54 

000A78 

000A9C 


000AC0 

000AE4 

000B08 

000B2C 

000B50 

000 B74 


000B98 
000BBC 
000 BE 0 
000C04 
000C28 
000C4C 


Other  fields  in  the  Device  Table  can  be  modified  by  referring  to  the 
listing  of  the  TABLES  program. 
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The  2741  Typewriter  Terminals,  2260  Display  Terminals,  and  the  2250  Display 
Scope  have  not  yet  been  attached  to  our  System/360  Model  40  but  have  been  provided  for 
in  the  TABLES  subprogram.  The  dummy  address  of  FFFF  has  been  used  until  we  deter¬ 
mine  what  the  actual  addresses  will  be. 

The  console  typewriter  is  not  handled  like  other  devices  since  it  is  controlled  by 
the  supervisor  and  is  used  by  all  job  programs.  Other  devices  are  not  shared  and, 
consequently,  are  used  by  only  one  job  program  at  a  time.  The  address  of  the  console 
typewriter  (TYPAD)  is  0009  and  is  contained  in  the  halfword  at  relative  location  003478 
in  TABLES. 

The  supervisor  checks  that  all  storage  addresses  passed  to  the  supervisor  through 
a  calling  sequence  from  job  programs  are  within  the  bounds  of  the  machine  core  storage. 
This  check  is  made  using  the  maximum  address  mask  (MAXADD)  which  is  the  ones  com¬ 
plement  of  the  maximum  address.  For  a  machine  with  65,536  bytes  of  core,  this  mask  is 
X'FFFFOOOO'  and  is  contained  in  the  word  at  relative  location  003470  in  TABLES. 

To  change  the  device  addresses,  the  TABLES  subprogram  can  be  reassembled, 
replace  cards  can  be  included  in  the  TABLE  object  deck,  or  patches  can  be  made  in  core 
after  the  system  has  been  loaded.  The  relative  locations  to  be  modified  with  replace 
cards  are  indicated  above.  In  making  a  core  patch,  the  location  where  the  TABLE  sub¬ 
program  has  been  loaded  is  obtained  from  the  loading  storage  map  and  this  location  is 
added  to  the  relative  locations  in  TABLES. 

The  DUMP  program  has  been  set  to  have  the  dump  printed  on  printer  E.  If  it  is 
desired  to  modify  the  printer  address  on  which  a  dump  will  be  produced,  the  halfword  at 
relative  location  000C62  in  the  dump  program  should  be  changed  (either  with  a  replace 
card  or  by  a  patch)  to  contain  the  desired  printer  address. 

To  make  a  core  patch,  the  instruction  address  switches  should  be  set  to  the 
location  ISTART  (obtained  from  the  loading  map)  and  the  address  compare  switch  set  to 
stop.  Loading  is  then  initiated.  During  the  loading  process  the  machine  will  stop  at  the 
location  ISTART.  The  start  button  should  then  be  pressed  to  continue  loading.  When  the 
machine  stops  a  second  time,  core  patches  can  then  be  made,  the  address  compare  switch 
‘  set  to  process,  and  the  start  button  pressed  to  begin  operation  of  the  supervisor. 
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c. 


Loading  Procedure 


The  LLMPS  object  decks  and  loader  control  cards  can  be  loaded  with  the  IBM 
Basic  Programming  Support  (8K  Card)  Utility  Program  relocating  loader  (360P-UT-020). 
Loading  can  be  accomplished  from  either  cards  or  tape.  If  it  is  desired  to  load  the 
system  from  tape,  the  Prestore  job  can  be  used  with  parameter  'EBCD',  to  place  the 
LLMPS  system  on  tape,  thus  forming  a  self-loading  7-  or  9-track  tape  version  of 
LLMPS.  Alternatively,  the  system  can  be  loaded  directly  from  cards.  The  structure 
of  the  system  deck  is  shown  in  Fig.  I.  C-l.  The  storage  map  obtained  on  loading  the 
system  provided  on  the  distribution  tape  is  shown  in  Fig.I.C-2.  The  format  of  all  loader 
control  cards  and  object  deck  cards  is  described  in  IBM  System/360  Basic  Programming 
Support  Basic  Utilities  (C28-6505). 

Job  programs  are  placed  after  the  TERM  job  and  may  be  in  any  order.  The 
subprograms  forming  the  JOBLST  are  placed  after  all  job  subprograms.  The  JOBLST 
begins  with  the  FSTJOB  subprogram  and  ends  with  the  LSTJOB  subprogram. 


Additional  job  programs  can  be  inserted  among  the  existing  job  programs,  and 
require  an  associated  job  list  entry  program  (as  specified  in  IV.  A- 3)  to  be  placed  among 
the  existing  job  list  entry  subprograms.  The  size  of  the  job  list  can  be  increased  by 
modifying  the  ’’ICS  JOBLST"  card.  Each  entry  in  the  job  list  requires  16  bytes  and 
must  have  a  unique  subprogram  name.  The  JOBLST  for  the  TERM  job  has  the  name 
FSTJOB.  The  last  job  list  entry  subprogram  has  the  name  LSTJOB.  Job  list  entry 
subprograms  for  each  job  should  have  as  subprogram  name  (symbol  field  in  the  start 
card)  a  name  formed  from  the  author's  name  and  a  sequence  number,  e.g.  ,  AUTHR1, 
AUTHR2,  etc. 

The  setting  of  the  set  location  counter  card  preceding  the  BUFFER  program  is 
chosen  to  place  the  buffers  at  the  highest  location  in  core.  The  listing  from  the  BUFFS 
program  is  used  to  determine  the  total  size  of  the  buffers,  and  this  size  is  then  subtracted 
from  the  number  of  bytes  of  core  storage  to  determine  the  value  in  the  SLC  card.  This 
value  must  not  be  less  than  the  address  of  "FINIS"  in  program  SUPER. 

The  last  card  (after  super)  is  an  LDT  ISTART  card  and  is  placed  to  begin 
supervisor  operation. 

The  lowest  location  used  for  loading  is  4096  (hex  1000)  to  provide  room  for 
storing  I/O  OLD  PSW,  CSW,  and  other  information  useful  during  debugging.  This 
location  can  be  lowered  by  modifying  the  constants  LOVVINT  and  HUNT  defined  in  the 
equalities  and  used  in  the  main  "SUPER"  program. 
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ID  Field 

IBM  BPS  Low  Relocating  Loader 

-  Version  2  (360-UT-020).  See  Note  1. 

40  LO 

SLC 

00C500 

Set  to  position  buffers  above  SUPER  in  high 

core 

BUFFER 

Subprogram  to  specify  buffer  areas 

BUFF 

SLC 

001000 

Start  loading  at  X'1000* 

IBM  BPS  Single  Phase  Dump  -  Version  1  (360-UT-019A).  See  Note  2. 

DMPS 

ICS 

DMPEND 

0008 

Remembers  Location  Counter 

SLC 

000C6C 

DUMP 

) 

ICS 

SNTPIN 

0000  l 

See  Note  3 

SLC 

000BE0 

DUMP 

1 

ICS 

OUTDEV 

0000  1 

SLC 

DMPEND 

/ 

Reset  Location  Counter 

ICS 

JOBLST 

01 A0 

Save  space  for  26  Job  List  Entries 

TABLES 

Supervisor  system  subprograms 

40  TAB 

BUFFS 

Supervisor  system  subprograms 

40BUF 

FNDJTL 

Supervisor  system  subprograms 

FNDJT 

FIDCQ 

Supervisor  system  subprograms 

FIDCQ 

FBJTJL 

Supervisor  system  subprograms 

FBJTL 

EXIT 

Problem  state  subprogram 

EXIT 

JBRP 

Problem  state  subprogram 

JBRP 

TPSUBR 

Job  program  subroutine 

TMSR 

CARDUC 

Job  program  subroutine 

CARDU 

TAPEUC 

Job  program  subroutine 

TAPEU 

TERM 

Job  program 

TERM 

JOBS 

Job  program 

JOBS 

TASKS 

Job  program 

TASKS 

JOBDMP 

Job  program 

JBDMP 

LOWCOR 

Job  program 

LOW 

CORDMP 

Job  program 

CORE 

TPMOVE 

Job  program 

TMJB 

CRDTAP 

Job  program 

CRDTP 

PRINT 

Job  program 

PRINT 

PUNCH 

Job  program 

PUNCH 

TPCOPY 

Job  program 

TPCPY 

T7DUMP 

Job  program 

T7DMP 

T9DUMP 

Job  program 

T9DMP 

LABEL 

Job  Program 

TPLBL 

ICS 

SSUPER 

0008 

Remember  Location  Counter 

SLC 

JOBLST 

Reset  Location  Counter 

FSTJOB 

Job  List  Entry  Subprogram  for  TERM  job 

FSTJB 

Other  job  list  entry  subprograms 

JBLST 

LSTJOB 

Last  job  list  subprogram 

LSTJB 

SLC 

SSUPER 

Reset  Location  Counter 

SUPER 

Main  Supervisor  State  Program 

40SUP 

LDT 

ISTART 

Placed  to  begin  operation  at  *  ISTART*  in  SUPER 

Fig.  I.  C-l.  LLMPS  Load  Deck  Structure 
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Note  1: 


» 

The  loader  is  the  standard  IBM  BPS  High  Relocating  Loader  -  Version  2.  The 
End  Card  Option  fields  have  been  left  blank  which  results  in  loading  from  the  IPL  device 
and  gives  no  storage  map  or  error  printout. 

Note  2: 

Seven  Replace  cards  (REP)  have  been  inserted  between  the  last  Relocation 
I  Directory  Card  (RLD)  and  the  End  card  (END)  of  the  dump  program  as  follows: 


REP 

000C58 

010000,  FFF8 

Core  size 

REP 

000C5C 

01FFFF 

REP 

000C62 

01000F 

Output  Printer  F 

REP 

000C62 

01000 E 

Output  Printer  E 

REP 

000F30 

010200, 0000, 0000 

Steal  I/O  Interrupt 

REP 

0010FA 

01D200,  0000,  0000 

Steal  I/O  Interrupt 

REP 

000E62 

014580,  F1B0 

Kill  typewriter 

The  last  three  Replace  cards,  as  well  as  the  Set  Location  Counter  cards  (SLC)  and 
Include  Control  Section  cards  (ICS)  that  immediately  follow  the  dump  program,  have  been 
added  to  enable  the  LLMPS  supervisor  to  handle  all  I/O  interrupts  even  when  the  dump  program 
is  being  executed. 

The  dump  will  be  printed  on  Printer  E.  If  it  is  desired  to  have  the  dump  on  Printer  F. 
the  third  and  fourth  should  be  interchanged.  Alternatively,  a  different  REP  card  can  be  used  for 
a  different  printer  address. 


Note  3: 

The  ICS  and  SLC  cards  following  the  dump  program  are  included  to  define  the  entry 
points  SNTPIN  and  OUTDEV  in  the  dump.  The  symbol  DMPEND  defines  the  double  word  aligned 
location  after  the  dump  subprogram  and  is  used  to  reset  the  location  counter  after  the  dump 
entry  points  have  been  defined. 
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STUKALt  MmH 


BUFF ER 

t  T 

LUCaT  ION 

OCC  b  C  C 

DUMP 

AT 

LlCA  T  IUN 

CC  ICcC 

TABLES 

AT 

LGCAT  ION 

CC  2  2  60 

JOET  BL 

AT 

LOCAT  IUN 

C  C  2  l  t  C 

UEVLST 

AT 

LCUAT  ION 

CL29SC 

CtVT  BL 

AT 

LUCAT  ION 

CC2AL C 

PLCL 

AT 

LOCAT  IUN 

0C2E0C 

MAXACC 

AT 

LOCAT ION 

CC  3  60 C 

NUMCtV 

A  I 

LUCaT  IUN 

CC  3604 

TV P  AC 

AT 

LClAT IUN 

CC  36GB 

BUFFS 

AT 

Lula  I  I on 

CCiCLC 

6 UFMAX 

AT 

LUCAT  1JN 

OC  36L0 

BUBS  IZ 

A  T 

LCLAT  ION 

C  C  3  6  h  6 

BUFLST 

A  1 

LOCATION 

CC371C 

fcNCBLS 

AT 

LCLAT  ION 

CC  3  7t4 

FNDJTL 

A  r 

LUCAT  IUN 

C  C  3  7  c  8 

F  1  L'CC 

A  T 

LL  CA  T  ION 

CO  3  hie 

FBJT  JL 

AT 

LUCAT  ION 

Cc?clC 

EX  1 1 

A  l 

LUCAT  ION 

CC3SE a 

JBRP 

AT 

LUCAT ION 

CC3ACC 

TPSUER 

AT 

LUCAT ION 

0C3DEC 

WTM 

A  1 

LOCAT ION 

0C3UE8 

ERG 

AT 

LUCAT  ION 

CC  3t  6  4 

FSR 

A  1 

LULA  T  ION 

CC3LA4 

BSK 

AT 

LUCAT  ION 

CC  JtT  d 

B3F 

AT 

LuCAT luN 

CC3F8C 

FSF 

AT 

LUCAT  ION 

CC3F38 

REW 

AT 

LOCAT  ION 

00  3FC4 

RUN 

AT 

LOLA  T  ION 

cos  a  4 

CARCUC 

A  1 

LOCAT ION 

c  o  4  i  t  a 

CCS1UC 

AT 

loca  r  ION 

C  C  4 1 6C 

CCRCUC 

AT 

LOCAT 1UN 

C  3  4  1  76 

TAPEUC 

A  T 

LOCAT  ION 

0C445C 

T  PR  LUC 

AT 

LOCAT  ION 

00445C 

TPtokUC 

AT 

LOCAT ION 

CC479E 

TERM 

AT 

LGCAT ION 

C  C  4  A  C  C 

JOBS 

A  T 

LUCAT  ION 

C  0  A  A  3  fc 

TASKS 

A  1 

LGCAT  ION 

CC  48  bfi 

JCBCMP 

AT 

LOCAT  ION 

CC4C60 

LCWCOR 

AT 

LUCAT IUN 

C04CF8 

CUR  CMP 

AT 

LUCAT ION 

CC4D2C 

TPMUVE 

AT 

LOCaT  ION 

CC4D6C 

JBM  1  M 

A  1 

LOCAT  ION 

0  C  4  0  c  C 

JEfcRC 

A  1 

LOCAT  IUN 

OCsUA  4 

jeesR 

AT 

LOCAT ION 

0C40L  B 

JflPSF 

AT 

LOCAT  ION 

CC4  E  2d 

JBBSF 

AT 

LUCAT ION 

CC4Lc4 

JBFSR 

AT 

LOCAT  ION 

0C4EAC 

J  ER  EU 

AT 

LGCAT  ION 

CC4LLC 

JBRUN 

A  I 

LGCAT  ION 

0C4F  1C 

CRCTAP 

AT 

LOCAT ION 

C  C  5  2  6  d 

PRINT 

A  1 

LOCAT  ION 

C067C8 

PUNCF 

A  T 

LuCAT  ION 

C  C  fc  fc  A  L 

Tpcupy 

AT 

LiiCAf  IUN 

C  u  7B  3  d 

T7CUMP 

A  1 

LOCm  T  ION 

C  C  ri  S  L  c 

T9UUMP 

A  1 

LOCAT  1JN 

U  C  S  3  b  B 

TPL  AEL 

AT 

LGCAT  1 0  N 

C  C  s  B  9  C 

FSTJOE 

AT 

LUCAT  ION 

CC^CCC 

WINE1  1 

AT 

LGCAT ION 

cc2Co: 

WINET2 

A  I 

L  L  C  A  T ION 

C  t.  c  L  v 

WINET3 

AT 

loc  a  t  ion 

0C2CF C 

HINET4 

AT 

LOCAT  ION 

CC 2  ICC 

WINE T  5 

AT 

LClAT  ION 

CC2  lie 

ARM  1 

AT 

LGCAT  IUN 

CC2  12C 

ARM2 

AT 

LGCAT  ION 

GC2  13t 

ARM  3 

A  T 

LOCAT  IUN 

GC214C 

ARM4 

A  1 

LOLAT  IUN 

CC2  1  bC 

ARM  5 

AT 

LOCAT ION 

CC2  ICC 

ARM6 

AT 

LOCAT  ION 

CC2  17C 

ARM  7 

AT 

LUCAT  ION 

0  C  2  1 8  C 

ARM  8 

AT 

LOCAT  ION 

CC219C 

FRANK  1 

AT 

LUCAT ION 

0C2  1AC 

JACK  1 

AT 

LuCAT  ION 

C  C  2  1  b  C 

CL ARE 2 

AT 

LOCAT  ION 

OC  ^  1C  C 

JACK  8 

A  T 

LGCAT ION 

0C2  1DC 

01  ANA 

AT 

LOCAT  1UN 

CU  2  It  C 

0D9TRK 

A  T 

LOCAT ION 

C  C  2  1 1 C 

COL ABL 

AT 

LCCaT  ION 

C  C  ^  ^  C  v. 

LSTJGE 

AT 

LOCAT  ION 

CC2 2  1C 

SUPER 

A  1 

LOCAT  ION 

QC9EB8 

1ST  ART 

AT 

LOCAT  ION 

0CB21B 

KiLCFR 

AT 

LGCAT  ION 

CCA339 

BRKCFR 

AT 

LOCATION 

CCA  3  3  1 

DELCFR 

A  l 

LGCAT  ION 

CCA  74 7 

JCBNC 

AT 

LOCAT ION 

C0A5B4 

FINIS 

AT 

LOCAT  ION 

CCB843 

Fig.  I.  C-2.  Storage  Map  for  System/360  Model  40 
LLMPS  with  Jobs  as  of  1  April  1966. 
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D. 


Functional  Description  of  the  Supervisor  and  its  Subprograms 


The  LLMPS  program  consists  of  thirteen  programs  which  are  named  in 
accordance  with  the  symbol  appearing  in  the  name  field  of  the  START  card  of  the 
corresponding  source  deck.  These  programs  are  listed  below,  with  a  brief 
description  of  their  function. 

1.  SUPER.  This  is  the  basic  supervisor  program.  It  operates  in  the 
Supervisor  state,  and  handles  all  interruptions,  manages  all  I/O  operations  and 
CPU  resource  allocation,  and  provides  special  services  to  the  tasks  operating 
under  LLMPS. 

2.  TABLES.  This  program  contains  no  executable  code.  It  serves  to 
reserve  space  for  and  set  values  in  several  tables  used  by  the  supervisor  to 
manage  its  operations.  The  tables  have  been  separated  from  the  SUPER  program 
to  facilitate  making  modifications.  These  tables  include  the  job  tables  (JOBTBL), 
the  device  list  (DEVLST),  and  the  device  tables  (DEVTBL). 

3.  BUFFS.  This  program  contains  no  executable  code.  It  is  a  directory  of 
buffer  (free  storage)  areas.  It  is  used  during  task  initiation  to  assign  buffers  to  a 
task,  and  at  task  termination  to  return  the  buffers  to  free  storage. 

4.  BUFFER.  This  program  contains  no  executable  code  and  reserves  no 
storage.  It  is  used  to  indicate  the  beginning  of  the  buffer  area,  the  directory  for 
which  is  maintained  in  BUFFS. 

5.  DUMP.  This  is  the  IBM-supplied  single-phase  dump  program,  modified  as 
shown  in  "Loading  Procedures".  It  operates  in  supervisor  state,  and  is  the  only 
program  besides  SUPER  which  does  so.  It  is  used  to  provide  diagnostic  dumps  of  the 
supervisor  or  its  tasks. 

6.  FNDJTL.  This  problem  state  subprogram  converts  the  task  number  to  the 
corresponding  job  table  location. 

7.  FIDCQ.  This  problem  state  subroutine  frees  the  I/O  devices  and  clears 
the  CPU  queue  for  the  specified  task.  It  is  used  only  to  terminate  a  task. 

8.  FBJTJL.  This  problem  state  subroutine  returns  buffers  to  free  storage  and 
clears  the  job  list  entry  (if  necessary)  at  task  termination.  It  also  prints  the  task 
termination  message  on  the  console  typewriter. 

9.  EXIT.  This  problem  state  program  calls  FIDCQ  and  FBJTL  and  terminates 
a  task.  It  is  invoked  from  a  job  by  executing  SVC  END. 

10.  JBRP.  This  problem  state  program  initiates  tasks  and  formats  the  parameters 
typed  on  the  console  typewriter. 
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11.  TERM.  This  problem  state  program  is  a  job  program  and  is  invoked 
from  the  console  by  typing  'TERM  n'  where  *n'  is  the  task  number.  It  is  used  by  the 
operator  to  terminate  a  task.  It  calls  FNDJTL,  FIDCQ  and  FBJTL. 

12.  FSTJOB.  This  program  contains  no  executable  code.  It  is  the  job  list 
entry  for  the  TERM  job  and  must  be  the  first  entry  in  the  job  list. 

13.  LSTJOB.  This  program  contains  no  executable  code.  It  contains  a 
dummy  job  list  entry  and  must  be  the  last  entry  in  the  job  list. 
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E.  Preparing  a  Supervisor  System 


The  Lincoln  Laboratory  Multi-Programming  Supervisor  is  formed  from  the 
main  supervisor  program  SUPER,  the  table  subprograms  TABLES  and  BUFFS,  the 
supervisor  subprograms  FNDJTL,  FIDCQ,  and  FBJTJL,  and  the  problem  state  sub¬ 
programs  EXIT  and  JBRP.  The  operation  of  the  supervisor  is  controlled  through  the 
use  of  a  set  of  tables,  the  Job  List,  the  Job  Table,  the  Device  List,  and  the  Device 
Table.  The  format  of  these  tables  are  defined  using  equalities  and  all  reference  to 
the  fields  in  a  table  are  made  symbolically.  The  equalities  specifying  the  table  for¬ 
mats  are  defined  in  an  Equalities  deck  and  this  deck  is  included  in  the  assembly  of 
those  programs  which  refer  to  the  tables.  Besides  defining  the  table  formats,  the 
Equalities  deck  indicates  the  number  of  job  tables  NJBTBL,  the  number  of  devices  on 
each  channel  NCHNLx,  and  the  total  number  of  devices  NDEVS.  These  numbers  must 
reflect  the  organization  of  the  tables  defined  in  the  TABLES  subprogram.  The  Equalities 
deck  also  assigns  a  symbolic  definition  to  the  permanent  storage  locations  in  low  core 
and  defines  the  general  registers  used  by  the  supervisor.  In  addition,  the  low  and  high 
storage  locations  used  to  store  the  IOO  PSW  and  CAW  on  an  I/O  interruption  are  defined 
in  the  Equalities  deck. 

The  TABLES  subprogram  defines  the  tables  used  by  the  supervisor.  It  contains 
the  Job  Tables,  the  Device  List,  and  the  Device  Tables,  as  well  as  a  mask  defining 
the  core  size,  the  device  address  of  the  console  typewriter,  the  total  number  of  devices 
and  a  Pool  of  256  double  word  entries  used  for  the  device  I/O  queues  and  the  CPU  queue. 
The  number  of  Job  Tables  defines  the  number  of  tasks  that  can  be  run  concurrently  in 
the  system.  The  Device  List  and  Device  Tables  indicate  the  devices  available  to  the 
system  and  must  correspond  and  be  grouped  by  channels. 

The  BUFFS  subprogram  defines  the  set  of  buffers  available  for  allocation  to  a  job 
program  and  also  indicates  the  size  of  the  largest  buffer.  The  number  of  buffers  of  a 
particular  size  and  the  sizes  are  specified  as  equalities.  The  BUFSIZ  table  contains 
double  word  entries  for  each  buffer  size.  The  BUFLST  table  contains  a  four  byte  entry 
for  each  buffer  to  be  defined.  The  BUFLST  table  must  immediately  follow  the  BUFSIZ 
table.  The  storage  area  reserved  for  the  buffers  is  specified  by  the  location  of  the 
BUFFER  subprogram  which  should  be  located  in  high  core  above  the  SUPER  program. 

To  assemble  the  source  decks,  the  Equalities  deck  must  be  included  in  the  source 
decks  of  the  SUPER,  TABLES,  and  JBRP  supervisor  programs,  and  the  source  decks  of 
the  JOBS,  TASKS,  and  JOBDMP  job  programs.  The  distribution  tape  has  the  Equalities 
for  the  Lincoln  Laboratory  configuration  inserted  in  these  decks.  The  assembly  pro¬ 
cedure  can  be  performed  from  the  source  program  decks  which  are  stored  on  the  dis¬ 
tribution  tape.  The  object  decks  produced  can  be  used  to  form  a  system  by  placing  the 
SUPER  object  deck  (the  first  object  deck  produced)  after  the  other  object  decks,  placing 
a  loader  and  the  dump  subprogram  at  the  front  of  the  deck,  and  inserting  the  appropriate 
control  cards. 
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II.  Supervisor  Operations 


Lincoln  Laboratory  Multi- Programming  Supervisor 
11  April  1966 

II.  Supervisor  Operations 

A.  Loading  the  Supervisor  System  from  Cards 

B.  Loading  the  Supervisor  from  a  System  Tape 

C.  System  Control  Panel 

D.  Supervisor  Wait  State 

E.  The  Task 

F.  The  Job  Request 

G.  Initiating  a  Task 

H.  Correcting  a  Typing  Mistake 

I.  Task  Termination 

J.  Sample  of  System  and  Task  Operations 
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A.  Loading  the  Supervisor  from  Cards 


To  load  the  supervisor  system  from  cards,  place  the  system  deck  in  the 
card  reader.  Ready  the  card  reader  and  press  the  End  of  File  (EOF)  button.  Set 
the  load  switches  to  the  address  of  the  card  reader  and  then  press  the  LOAD  button. 

All  cards  should  be  read,  the  machine  automatically  placed  in  Wait  State, 
and  the  name  and  date  of  the  current  system  printed  on  the  console  typewriter.  The 
system  is  then  ready  for  operation.  If  the  loader  encounters  any  trouble,  an  operator 
message  code  may  be  printed  on  the  console  typewriter  and  displayed  in  the  instruction 
address  lights.  The  codes  and  their  meaning  are  described  in  Appendix  A,  Form 
C28-6557,  BPS  Operating  Guide  for  Basic  Assembler  and  Utilities. 
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B.  Loading  the  Supervisor  from  a  System  Tape 


To  load  the  supervisor  from  the  system  tape,  mount  the  system  tape  on  a  tape 
drive  and  ready  the  unit.  Dial  the  load  switches  to  the  address  of  the  tape  unit.  Press 
System  Reset  and  then  press  the  Load  button.  The  supervisor  will  be  read  from  the 
system  tape,  loaded  into  core,  and  ready  for  use. 
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C.  System  Control  Panel 


During  the  normal  operation  of  the  supervisor,  the  Interrupt  button  on  the 
System  Control  Panel  has  no  effect.  It  may  be  pressed  at  will.  When  there  is  a  demand 
for  the  console  typewriter  but  it  is  in  a  not  ready  state,  the  machine  is  put  in  Wait  state 
with  code  F0F0F0  in  the  current  instruction  address.  When  this  happens,  the  typewriter 
should  be  made  ready,  and  the  machine  interrupt  button  pressed  to  resume  operation  of 
the  supervisor. 

During  the  operation  of  the  supervisor,  the  operator  control  panel  on  the 
Model  40  should  be  set  as  follows: 

a)  Rate  switch  set  to  Process. 

b)  Address  Compare  switch  set  to  Process. 

c)  CPU  check  switch  set  to  Stop. 

d)  Interval  timer  disabled. 
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D.  Supervisor  Wait  State 


When  the  supervisor  is  in  operation,  it  may  be  in  either  Wait  or  Run  state. 
When  it  is  in  Wait  state,  the  code  in  the  current  instruction  address  indicates  the  reason 
for  being  in  Wait  state.  Under  normal  conditions,  the  supervisor  goes  into  Wait  state 
whenever  there  is  no  demand  for  the  central  processor,  although  I/O  operations  may  be 
in  progress.  In  this  case,  the  code  in  the  instruction  address  is  000FF0. 

The  supervisor  may  go  into  Wait  state  under  three  other  conditions.  When 
there  is  a  demand  for  the  console  typewriter  but  it  is  not  in  a  ready  state,  the  system 
alarm  will  sound  and  the  machine  put  in  Wait  state  with  the  code  F0F0F0  in  the  instruc¬ 
tion  address. 

The  typewriter  should  be  made  ready  and  the  machine  interrupt  button  pressed. 
If  the  interrupt  button  is  pressed  while  the  typewriter  is  not  ready,  the  alarm  will  be 
sounded  again. 

When  the  console  typewriter  is  in  CE  mode,  the  alarm  cannot  be  sounded  even 
though  the  typewriter  is  not  ready  for  use.  This  condition  can  be  recognized  by  the  Wait 
state  code  F0F0F0  in  the  instruction  address. 

Another  condition  in  which  the  supervisor  will  go  into  Wait  state  is  when  there 
is  an  unrecoverable  supervisor  error.  The  code  under  this  condition  is  FFFFFF.  If 
this  should  occur,  a  core  dump  should  be  taken,  and  the  system  reloaded.  This  dump 
should  be  saved  and  the  responsible  system  programmer  notified. 

If  a  machine  check  should  occur,  the  Supervisor  will  go  into  Wait  state  with 
code  000AAA.  The  IBM  CE  should  be  called  immediately. 
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E.  The  Task 


A  task  is  created  on  the  activation  of  a  job  program  by  a  request  issued  through 
the  use  of  the  console  typewriter.  Associated  with  each  task  is  a  task  number,  assigned 
at  the  creation  of  the  task,  used  to  identify  the  task.  Through  the  use  of  the  task  number, 
the  pseudo  sense  switches  associated  with  a  task  can  be  read  and  altered  (SS  job),  the 
task  can  be  terminated  from  the  console  typewriter  (TERM  job),  or  a  dump  of  the  job 
program  together  with  the  tables  associated  with  the  particular  task  can  be  produced 
(JOBDUMP  job).  The  task  number  is  incremented  as  each  new  task  is  created. 


II.  E-l 


F.  The  Job  Request 


A  request  consists  of  a  job  name,  device  ID's,  if  required,  and  a  variable 
number  of  parameters  (possibly  none)  separated  by  any  number  of  spaces.  For  each 
job,  the  required  ID’s  and  the  optional  parameter  are  described  in  a  write-up  for  the 
job.  A  request  may  be  typed  using  either  upper  or  lower  case  alphabetic  character. 

The  device  ID’s,  if  required,  must  be  specified  in  a  particular  order.  The 
precedence  of  devices  are  indicated  in  the  list  below.  For  example,  a  printer  ID  must 
be  specified  before  a  tape  ID. 


Device  Name 

ID 

RDR 

RDRr 

PCH 

PC  He 

PTR 

PTRp 

7TP 

Txxx 

9TP 

Txxx 

TP 

Txxx 

DISK 

Dyyy 

PDA 

PD  An 

PLOT 

PLTn 

SCOP 

SCn 

DISP 

DTn 

TYPE 

Xxxx 

TTY 

TTYn 

CONS 

CONS 

Typg 

2540  Card  Reader 
2540  Card  Punch 
1403  printer 
7-track  tape  unit 
9 -track  tape  unit 

either  7-track  or  9-track  tape  unit 

2311  disk  unit 

2701  Parallel  Adapter 

Calcomp  Plotter 

2250  Display  Scope 

2260  Display  terminals 

2741  Typewriter  terminal 

Teletype  terminal 

1050  Console  typewriter 


If  only  one  unit  of  a  given  device  type  is  attached  to  the  system,  then  the  device 
identification  of  the  unit  is  not  specified  in  the  job  request. 

The  parameters  for  a  job  may  be  specified  in  any  order  except  that  parameter 
pairs  must  be  specified  together.  A  parameter  may  be  either  alphanumeric  or  numeric. 
If  a  parameter  is  alphanumeric  (i.  e. ,  contains  a  character  other  than  a  digit  or  a  plus 
or  minus  sign)  only  the  last  4  characters  of  the  parameter  field  are  considered  as  the 
parameter.  If  a  parameter  is  numeric,  it  may  be  a  signed  integer  of  up  to  8  digits.  If 
the  numeric  parameter  contains  more  than  8  digits,  only  the  last  8  digits  are  considered 
as  part  of  the  parameter.  If  a  numeric  field  contains  an  embedded  plus  or  minus  sign 
only  those  digits  following  the  sign  are  considered  as  forming  the  numeric  parameter. 


II.  F-l 


G.  Initiating  a  Task 


To  initiate  a  task,  i.e.,  to  activate  a  job,  the  Request  Key  on  the  console 
typewriter  should  be  pressed.  A  task  number  to  be  associated  with  this  task  will  be 
printed.  A  job  request  should  then  be  typed  and  the  request  line  terminated  with  a 
carrier  return  or  End  of  Block  (ALT  together  with  EOB)  code. 

To  cancel  a  request  and  to  free  the  typewriter,  type  the  cancel  code  (ALT 
together  with  CANCEL).  To  initiate  another  request,  the  Request  Key  must  be  pressed 
again. 


If  more  than  the  maximum  number  of  character  permitted  per  line  are  typed 
(120),  or  more  than  the  maximum  number  of  parameters  for  a  job  are  specified  (13), 
the  task  will  not  be  initiated  and  a  message  will  be  printed. 

Under  certain  timing  situations  an  overrun  condition  can  occur  for  the  console 
typewriter.  In  this  case,  a  message  is  printed,  and  the  task  number  is  printed  again  so 
that  the  task  can  be  reinitiated. 


II.  G-l 


H.  Correcting  a  Typing  Mistake 


A  typing  mistake  can  be  corrected  either  on  a  character  basis  or  on  a  line 
basis  or,  in  some  circumstances,  on  a  parameter  basis. 

a.  On  a  character  basis: 

Type  a  quote  character  (")  for  each  single  character  or 
space  to  be  deleted.  To  delete  the  last  n  characters  or 
spaces,  type  n  quote  characters  (e.g. ,  to  delete  the  last 
3  characters,  type  3  quote  characters). 

b.  On  a  line  basis: 

Type  a  question  mark  (?)  to  delete  a  complete  line  and 
begin  again  on  the  next  line.  The  task  number  is  auto¬ 
matically  retyped. 

c.  On  a  parameter  basis: 

If  a  mistake  is  made  in  typing  a  four  character  alphanumeric 
parameter,  more  than  four  characters  may  be  typed  in  this 
field  where  the  last  four  characters  form  the  intended  para¬ 
meter.  No  blank  (or  space)  characters  may  be  part  of  a  field. 

If  a  mistake  is  made  in  typing  a  numeric  parameter,  the 
intended  numeric  parameter  may  be  typed  as  the  last  8  digits 
of  the  field  (possibly  with  leading  zeros)  if  the  sign  of  the 
integer  thus  formed  is  correct.  Alternatively,  the  sign  of 
the  parameter  may  be  retyped  followed  by  the  digits  of  the 
number,  since  only  those  digits  following  the  sign  are  con¬ 
sidered  as  forming  the  numeric  parameter.  No  blank  (or 
space)  characters  may  be  part  of  a  field. 


II.  H-l 


I.  Task  Termination 


Whenever  a  task  terminates,  a  message  is  printed  on  the  console  typewriter 
giving  a  termination  code  for  the  task.  The  termination  codes  are: 

Associated  with  Task  — 

O.  K.  Satisfactory  completion  of  the  task. 

KILL  Task  terminated  by  console  initiation. 

ERR  Request  error  because  of  one  of  the  following  conditions: 

JOB  NAME  NOT  FOUND 
JOB  NOT  FREE 
DEVICE  NAME  NOT  FOUND 
DEVICE  NOT  FREE 
DEVICE  NOT  OPERATIONAL 
NO  BUFFER  AVAILABLE 
BUFFER  SIZE  TOO  LARGE 
JOB  LIST  ERROR 
JOB  HEADER  ERROR 

INOP  Device  inoperational.  Check  for  control  unit  off-line. 

Associated  with  Job  Program  -- 

PGNT  Program  error  interrupt  in  job  program. 

SVC  Supervisor  call  error. 

ILDN  Illegal  logical  device  number  in  job  program. 

CSW  Channel  program  error  in  job  program. 

If  the  TERM  job  is  used  to  terminate  a  task,  two  messages  will  be  printed;  one 
for  the  task  being  terminated  (code:  KILL)  and  one  for  the  TERM  task  (code:  O.  K. ). 


The  termination  codes  associated  with  a  job  program  should  not  occur  except 
while  a  job  program  is  being  debugged.  When  they  do  occur,  a  dump  of  the  job  pro¬ 
gram  will  have  been  produced.  The  dump,  together  with  the  console  listing,  should  be 
saved  for  the  job  programmer. 


II.  1-1 


J.  Sample  of  System  and  Task  Operations 


The  attached  printout  from  the  console  typewriter  illustrates  the  operation 
of  the  Lincoln  Laboratory  Multi -Programming  Supervisor.  On  the  first  initiation  of 
task  1,  the  question  mark  (?)  was  used  to  cancel  the  line  typed  and  to  begin  the  task 
again.  The  PRINT  job  was  then  initiated  as  task  1.  On  the  initiation  of  task  2,  the 
quotation  character  (")  was  used  to  delete  the  erroneously  typed  character  (r).  This 
job,  JOBS,  list  all  the  jobs  in  the  system  together  with  the  required  devices.  A  tape 
copy  job  was  then  initiated  as  task  3  to  copy  tape  T183  onto  tape  T184.  The  TASKS 
job,  task  4,  list  the  active  jobs  and  the  device  units  being  used.  Notice  the  message 
written  by  the  task  3  TPCOPY  job  after  the  information  from  the  TASKS  job. 

The  PRESTORE  job  was  initiated  as  task  5  using  tape  unit  T281.  Since  there 
is  only  one  2540  card  reader  attached  to  the  system,  the  identification  of  this  device 
was  not  specified  in  the  job  request.  Tape  T280  was  rewound  as  task  6  and  tape  T283 
was  rewound  as  task  7.  Note  here  the  use  of  the  quotation  mark  (")  to  change  the 
specified  tape  from  286  to  283.  In  task  8  the  TPCOPY  was  initiated  with  optional 
parameters  PAR  and  EVEN.  The  messages  printed  after  this  initiation  come  from 
tasks  1,  3  and  8  as  indicated. 

As  task  9,  an  undefined  job  (CANCEL)  was  initiated.  This  task  was  terminated 
with  code  ERR.  On  task  10  an  overrun  condition  occurred. 
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III.  Job  Operating  Instructions 

A.  Job  Summaries 

1.  System  Jobs 

2.  Dump  Jobs 

3.  Utility  Jobs 

4.  Job  Request  Summary 

5.  Sense  Switch  Usage  Summary 

B.  Job  Write-Ups 


III-O 


Revised  1  April  1967 


A.  Job  Summaries 

The  following  brief  description  of  the  LLMPS  system  jobs,  dump  jobs,  and 
utility  jobs  indicate  the  programs  available  for  use,  and  indicate  the  date  of  the  latest 
complete  write-up  on  each  program.  An  asterisk  will  appear  before  the  jobname  if 
the  program  or  complete  job  write-up  has  been  changed  since  the  summary  sheet  was 
last  prepared. 

The  complete  job  write-up  prepared  for  each  job  in  the  system,  contains  the 
following  information: 

a)  Job  Summary 

b)  General  Information 

c)  Task  Request  Summary 

d)  Task  Request  Format 

e)  Operating  Notes 

f)  Example  of  the  Job  Request 

g)  Console  Messages 

The  Job  Request  Summary  gives  the  Jobname,  Device  ID's,  and  Parameters  for 
all  jobs  presently  included  in  the  system.  Optional  parameters  are  enclosed  in  brackets 
with  the  default  value  indicated  in  parentheses.  In  the  cases  where  the  default  value 
cannot  be  specified  as  a  parameter,  the  default  condition  is  indicated  in  lower  case. 
Re-entrant  jobs  are  indicated  by  (R)  preceding  the  jobname.  For  each  job,  the  devices 
used  and  the  possible  parameters  are  described  in  a  separate  write-up  for  the  job.  The 
system  output  unit  (indicated  by  an  asterisk  on  the  Job  Request  Summary)  is  used  for 
system  dump  jobs.  On  the  Model  40  the  system  output  unit  is  Printer  3  (PTR3). 

The  Sense  Switch  Usage  Summary  indicates  the  usage  of  the  job  sense  switches. 
For  each  job  which  uses  the  sense  switches,  an  X  appears  in  the  appropriate  row 
indicating  that  the  corresponding  sense  switch  bit  is  applicable  to  that  job. 


The  parameter  variables  used  in  the 

job  summary  are  as  follows 

tttt 

task  number 

n,  nl,  n2,  . . . 

count  numbers 

xxxxxx 

input  reel  number 

yyyyyy 

output  reel  number 

s, nnnnn 

buffer  sizes 

jjj  j 

job  number 

jnjnjnjn 

job  name 

si,  s2,  ...  s32 

bit  numbers 
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Lincoln  Laboratory  Multi -Programming  Supervisor 
Job  Summary 
System  Jobs 


JOBS  -  15  July  1966 

Prints  on  the  console  typewriter  a  list  of  the  jobs  which  can  be  initiated.  The 
required  devices  for  each  job  are  indicated  following  the  jobname;  and  a  version  code 
precedes  the  jobname.  If  a  job  is  re-entrant,  i.e. ,  can  be  activated  for  more  than 
one  task,  the  symbol  (R)  precedes  the  version  code. 

TASKS  -  15  July  1966 

Prints  on  the  console  typewriter  a  list  of  the  jobs  which  are  active,  (i.  e. ,  tasks) 
indicating  the  device  units  being  used  and  the  task  number  for  each  active  job. 

TERM  -  15  July  1966 

Terminates  an  active  task.  The  device  units  associated  with  the  task  are  freed 
and  become  available  for  other  tasks.  This  job  is  re-entrant  and  may  be  re-issued  to 
terminate  more  than  one  task. 

CHANGBUF  -  6  June  1966 

Performs  the  task  of  changing  the  buffer  sizes  used  by  job. 

SWITCHES  -  15  July  1966 

Displays,  or  modifies  and  displays,  the  sense  switches  of  an  active  task. 
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Lincoln  Laboratory  Multi  Programming  Supervisor 
Job  Snmma  ry 
I  )iiinp  Jobs 


JOHIXJMP  -  1b  March  l%o 

A  dynamic  dump  of  an  active  job  is  produced  on  the  system  output  unit.  This 
job  is  re-entrant. 

LOWCORE  -  16  March  1%f> 

A  dump  of  the  first  HHH)  bytes  of  core  is  produced  on  the  system  output  um». 

COREDIJMP-  10  March  1900 

A  dump  of  core  is  produced  on  the  system  output  unit.  This  job  is  re-entrant. 
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Lincoln  Laboratory  Multi -Programming  Supervisor 
Job  Summary 
Utility  Jobs 
1  April  1967 


FSR  -  16  March  1966 

Forward  spaces  n  records  of  a  tape. 

BSR  -  16  March  1966 

Backspaces  n  records  of  a  tape. 

FSF  -  16  March  1966 

Forward  spaces  n  files  of  a  tape. 

BSF  -  16  March  1966 

Backspaces  n  files  of  a  tape. 

REW  -  16  March  1966 
Rewinds  a  tape. 

RUN  -  16  March  1966 

Rewinds  and  unloads  a  tape. 

WTM  -  16  March  1966 

Writes  n  tape  marks  (end  of  files)  on  a  tape. 

ERG  -  16  March  1966 

Erases  n  record  gaps  (3”  of  tape/gap)  of  a  tape. 


*  CONVERT  -  3  November  1966 

Accepts  cards  punched  with  the  codes  produced  by  an  IBM  Model  026  card  punch 
(the  pre-360  BCD  code)  and  produces  new  cards,  on  a  one-for-one  basis,  that  are 
punched  in  accordance  with  the  EBCDIC  code  used  by  S/360.  This  job  is  useful  in 
converting  cards  punched  on  the  Model  026  Card  Punch  to  cards  that  would  have  been 
punched  on  the  (newer)  Model  029  Card  Punch  if  keys  with  the  same  graphics  had  been 
used. 
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*REPRO  -  3  November  1966 

Produces  new  cards  on  a  one-for-one  basis.  The  reproduced  cards  are  identical 
to  the  input  cards  regardless  of  the  codes  used.  Input  codes  are  not  checked  for  validity; 
therefore,  the  job  may  be  used  to  duplicate  any  deck. 

PRESTORE  -  27  May  1966 

Performs  the  task  of  recording  card  images  on  magnetic  tape.  The  program  runs 
in  two  modes;  for  the  7094  it  will  prestore  both  BCD  and  binary  card  images  adding  the 
proper  look-ahead  bits  to  each  record,  for  the  360  it  will  prestore  EBCDIC  card  images 
in  odd  parity  with  the  converter  on. 

*  PRINT  -  1  April  1967 

Processes  labeled  and  unlabeled  7  or  9  track  tapes.  7-track  tapes  may  be  read 
under  any  density  and  mode  set  specification.  9-track  tapes  force  800  bpi  and  odd  parity. 
Mixed  density  tapes  cannot  be  printed. 

*  PUNCH  -  1  April  1967 

Punches  a  7-track  tape  written  in  odd  and/or  even  parity  or  a  9-track  tape.  Cards 
can  be  punched  as  column  binary,  BCD,  or  EBCDIC.  Tapes  may  be  labeled  or  unlabeled 
and  may  be  of  any  density. 

*  PUNCHSEP  -  1  April  1967 

Like  the  PUNCH  job  except  that  two  blank  cards  from  the  reader  are  inserted  into 
the  punched  deck  whenever  an  end  of  file  or  system  output  flip  card  is  recorded  on  the 
tape. 

*  EJECT  -  1  April  1967 

Restores  and/or  spaces  the  paper  on  a  printer. 

*TPCHECK  -  1  April  1967 

Examines  a  7-track  or  a  9-track  tape  for  parity  errors  and  converter  checks, 
lists  sense  information  on  a  permanent  read  error,  switches  parity  from  even  to  odd 
(or  odd  to  even)  if  necessary,  recording  the  location  and  number  of  switches,  and 
determines  the  number  of  bytes  per  record  and  records  per  file. 

*TPCOPY  -  1  April  1967 

Performs  copy  and/or  comparison  of  7-  or  9-track  tapes.  Options  are  available 
for  selecting  parity,  density,  number  of  files,  and  use  of  the  data  conversion  feature. 
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T7DUMP  -  27  May  1966 

Dumps  a  7 -track  tape  of  either  even  or  odd  parity  in  octal  format.  This  job 
replaces  the  function  previously  performed  on  the  1401  with  the  BCD/Binary  dump 
tape  program. 

T9DUMP  -  31  August  1966 

Dumps  a  9-track  tape  or  a  7 -track  tape  (recorded  with  density  800,  odd  parity, 
converter  on)  generated  on  the  360.  The  dump  can  be  in  hexadecimal  or  hexadecimal 
and  EBCDIC,  and  the  number  of  files  to  be  dumped  may  be  specified. 

LABEL  -  5  October  1966 

Performs  the  task  of  writing  a  label  on  a  7-track  tape  (even  parity,  translator  on, 
density  200,  556,  or  800)  or  on  a  9-track  tape  (odd  parity,  density  800)  on  the  360.  The 
label  record  is  a  single  record  followed  by  a  tape  mark  (EOF). 

CALCOMP  -  27  May  1966 

Performs  the  task  of  plotting  standard  Calcomp  output  tapes  produced  on  the  7094 
or  360.  Each  picture  or  reference  point  on  the  tape  is  separated  by  a  header  record. 

Thus,  the  operator  may  skip  to  any  specific  picture  within  a  file.  Can  only  be  used  on  the 
360/40. 

DISKDUMP  -  17  June  1966 

Displays  the  contents  of  a  2311  disk  on  a  printer.  Records  on  the  disk  may  be 
dumped  in  both  hexadecimal  and  EBCD  or,  alternatively,  the  standard  Volume  Table  of 
Contents  (VTOC)  may  be  displayed.  Can  only  be  used  on  the  360/67. 

HNPNLOAD  -  5  October  1966 

Loads  the  arrangement  of  240  codes  for  either  an  HN  or  PN  train  into  the  read/write 
storage  units  of  the  2821  control  unit  for  a  1403  printer. 

UCSLOAD  -  5  October  1966 

Loads  a  specified  arrangement  of  240  codes  selected  from  the  Extended  Binary 
Coded  Decimal  Interchange  Code  into  the  read/write  storage  units  of  the  2821  control 
unit  for  a  1403  printer. 

*PUNCHTAP  -  21  November  1966 

Reads  card  images  in  EBCDIC  code  from  a  9-track  tape  (or  from  a  7-track  tape 
with  density  800,  odd  parity,  converter  on)  and  punches  them  out  on  paper  tape  in 
FIELDATA  code.  The  paper  tape  produced  can  be  used  as  input  to  the  Univac  1219. 
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*  LESTER  -  14  November  1966 

Receives  LES  telemetry  data  via  one  of  the  LES  telephone  lines  from  the  tracking 
station;  formats  the  input  data  into  printable  records;  and  outputs  these  records  onto 
either  a  7  or  9-track  tape. 

*LOAD  -  1  April  1967 

Relocates  and  loads  assembled  LLMPS  programs  and  program  joblists  into  core. 

*  UNLOAD  -  1  April  1967 

Removes  from  core  storage  the  job  programs  and  joblist  programs  loaded  into 
core  by  the  LOAD  program. 

*  SHARE  -  1  April  1967 

List  and  punch  catalog  and/or  order  cards  from  a  SHARE  Distribution  Tape  Reel 
(DTR)  or  will  retrieve  source  and  object  decks  from  the  DTR  or  from  a  SHARE  Series 
Library  Tape  (SLT). 
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Lincoln  Laboratory  Multi- Programming  Supervisor 
Job  Request  Summary 
1  April  1967 


(R) 


JOBNAME 


UNITS 


PARAMETERS 


JOBS 

- 

TASKS 

- 

TERM 

- 

tttt 

SWITCHES 

- 

tttt  [ si  s2  . .  .  s32] 

CHANGBUF 

- 

jnjnjnjn 

"BFNO  n ' 
(BFNO 1). 

'SIZE  nnnnn  1 
(SIZE  maxbuf)J 

LOAD 

RDRr 

UNLOAD 

- 

(R) 

JOBDUMP 

* 

LOWCORE 

* 

(R) 

COREDUMP 

* 

(R) 

ERG 

Txxx 

(R) 

WTM 

Txxx 

(R) 

FSR 

Txxx 

(R) 

BSR 

Txxx 

(R) 

FSF 

Txxx 

(R) 

BSF 

Txxx 

(R) 

REW 

Txxx 

(R) 

RUN 

Txxx/ 

(R) 

CONVERT 

RDRr 

(R) 

REPRO 

RDRr 

PRESTORE 


RDRr 


Txxx 


PRINT 


FTRp 


Txxx 


PUNCH 


PC  He 


Txxx 


tttt 


"DEN  2" 

DEN  5 
(DEN  8) 

n 

(i) 

DEN  2 
DEN  5 
/DEN  81 


BCD  I 
JEBCDJJ 


r  MORE  1 
l/terminatesll 


“OP" 

"DEN2" 

OT 

~94TP  ' 

'UFRM 

DEN5 

OC 

NLBL 

VFRM 

"EOF  nl 

pEN8) 

FT 

(LABL) 

FFRM  x 

(EOF  3)1 

(ET) 

(FFRM 133). 

FILE  n  I 
/all  the  tape)J 


SP1 
SP2 
SP3 
SPCE 
l(SPC)J 


CONT 
/readjabel) 


(■  DUMP 

[/no  labels,  no  EOF)] 


"Mac' 

NOC 

r  END 

.(ASA) 

[(no  eject) 

( 

JOBjjjj  ]  f  SYST 


rEP  i 


IDEN2 

DEN5 


T 

ET 

"94TP  ' 

"UFRM 

OP 

LABL 

VFRM 

Feof  xl 

OT 

(NLBL) 

FFRM  x 

[/EOF  3)J 

bd 

(FFRM  80)l 

FILE  xl 
/FILE  1)J 


CONT  ' 

'COLB' 

/read label) 

/EBCD) 

PUNCHSEP 


RDRr  PC  He  Txxx 


/same  as  1 
Uor  PUNCH/ 


END  1 
/no  insert)] 
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EJECT  PTRp 

Q  ft 

TPCHECK  Txxx 

'DEN2] 

DEN5 

j(DEN8)l 

EO' 

OC 

OP 

(EP). 

[a 

7ILE  x  ’ 
7ILE  1) 

1  r  RCL  1  r  SENS  -J 

J  [(no  RCL)J  [(no  sense  listed)J 

'DEN  T 
DEN  5 
(DEN  8) 

"TASK  COPY  ' 
TASK  COMP 
(TASK  BOTH) 

rIN  xxxxxxi  rOUT  yyyyyyl 

UIN  ----)  J  L(OUT - )J 

(R)  TPCOPY  Txxx  Tyyy 

[EOF  nl 

L  (all)  J 

’PAR  ODD 
PAR  EVEN 
(PAR  BOTH] 

"CON  ON  1  r  TRAN  ON  1 
(CON  OFF)l  l(TRAN  OFF  J 

"Msgs  ofi 
.(MSGS  ON 

31 

TRYS  n" 
TRYS  5] 

[BUFF  s] 

T7DUMP  PTRp  Txxx  (7  tr) 

"DEN  2 
DEN  5 
(DEN  81 

[FILE  n 
[(FILE  1 

l 

“BIN 

BCD 

EVEN 

^(mixed). 

(R)  T9DUMP  PTRp  Txxx  j 

'FILE  nl 
.(FILE  1)J 

r  EBCD  ■ 
[(Hex  only) 

LABEL  Txxx  BINxxx  RELxxx 

J 

•DEN2- 

DEN5 

pEN8) 

‘V  OLx  I  r  ID  1 

(VOL1)]  [(lincolnlab)J 

CALCOMP  Txxx  PLTn 

Fn 

(no  file  skipping! 

(i 

Pn  -I  [  CONT  I 

io  picture  skipping)]  knew  tape)J 

(R)  UCSLOAD  RDRr  PTRp 

"  FOLD 
(no  folding 

A 

(R)  HNPNLOAD  PTRp 

“  FOLD 
(no  folding 

A 

"PN 

.(HN 

,] 

DEKDUMP  PTRp  Dddd 

r cyl  trk  r( 
L  (VTOC) 

1 

maxcyl  maxtrk 

.  (entire  disk). 

SHARE  RDRr  PC  He  PTRp  Txxx  JOB  n 

"DEN2 

DEN5 

XDEN8' 

) 
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Revised:  i  April  1967 


Sense  Switch  Usage  Summary 


Standard 

Sense 

Switches 


r  8 

X 

Delete  unit  check  messages 

8 

X 

Single  spacing 

9 

X 

Double  spacing 

Job 

10 

X 

Triple  spacing 

Oriented 

11 

X 

Program  control 

Sense 

12 

X 

Program  control  and  eject 

Switches 

13 

Unused 

31 


Unused 
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1  April  1967 


Buffer  Usage  Summary 

Buffers  marked  with  an  asterisk  (*)  can  be  changed  using  the  CHANGBUF  job. 
Multiple  buffers  of  the  same  size  must  all  be  changed  to  the  same  size. 


3. 


6. 

7. 

8. 


Job 

JOBS 

TASKS 

TERM 

SWITCHES 

JOBDUMP 

LOWCORE 

COREDUMP 


FSR,  BSR,  FSF,  BSF 
REW,  RUN,  WTM 

PRESTORE 


5F,  \ 

,  ERG  J 


5.  PRINT 

PUNCH 

PUNCHSEP 


EJECT 

TPCHECK 

TPCOPY 

T7DUMP 


9.  T9DUMP 


Buffer  No. 


none 


none 

1 

2 

1,2,3 

4 

1,2 

3 

1,2 

3 

1,2 

3 

1 

1 

1,2 

3 

1 

2 

3 

4 

1 

2 


Buffer  Size 


04 

72 

168 

120 

2000  * 
812 

200  * 
812 

200  * 
812 

812 

256 

2048  * 
1024 

2000  * 
168 
36 
132 

256  * 
4«n 


10. 

LABEL 

1 

11. 

CALCOMP 

1 

12. 

CHANGBUF 

none 

204 

1772 
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13. 

14. 

15. 

16. 

17. 

18. 

19. 

20. 


Job 

DISKDUMP 


HNPNLOAD 

UCSLOAD 

CONVERT 
RE  PRO 

PUNCHTAP 


LESTER 

LOAD 

UNLOAD 

SHARE 


Buffer  No. 

1 

2 

3 

1 

1 

1 

1 

1 

2 

3 

1,2 

3 

1 

2 

1 

1 


Buffer  Size 

3630 

7300 

96 

868 

868 

660 

660 

96 

200 

100 

960 

133 

2048  * 
816 

284 

2048 
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B.  Job  Write-Ups 


This  section  contains  write-ups  for  each  job  in  the  system.  The  jobs  are 
grouped  into  three  categories:  System  Jobs,  Dump  Jobs,  and  Utility  Jobs.  Each 
write-up  contains  the  following  information: 

a)  General  information  on  the  use  of  the  job. 

b)  Job  summary. 

c)  Task  request  format. 

d)  Operating  notes. 

e)  Examples  of  the  job  request. 

f)  Console  messages. 


III.  B-0 


SYSTEM  JOBS 


Lincoln  Laboratory  Multi -Programming  Supervisor 


Job  Operation  Instructions 
System  Jobs 
15  July  19b6 


General  Information: 

The  system  jobs  do  not  require  any  devices  except  the  use  of  the  console 
typewriter.  They  should  be  included  with  all  supervisor  systems. 

System  Jobs:  JOBNAME  PARAMETERS 


A.  JOBS 

Description: 


Prints  on  the  console  typewriter  a  list  of  the  jobs  which  can  be  initiated. 
The  required  devices  for  each  job  are  indicated  following  the  jobname;  and  a  version 
code  precedes  the  jobname.  If  a  job  is  re-entrant,  i.  e.  ,  can  be  activated  for  more 
than  one  task,  the  symbol  (R)  precedes  the  version  code. 

B.  TASKS 

Description: 


Prints  on  the  console  typewriter  a  list  of  the  jobs  which  are  active, 

(i.  e.  ,  tasks)  indicating  the  device  units  being  used  and  the  task  number  for  each 
active  job. 

C.  TERM  tttt 

Description: 

Terminates  an  active  task  where  tttt  is  the  task  number.  The  device  units 
associated  with  the  task  are  freed  and  become  available  for  other  tasks.  This  job  is 
re-entrant  and  may  be  re-issued  to  terminate  more  than  one  task. 
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Console  Message: 


1.  JOB  NUMBER  NOT  IN  JOB  TABLES 

The  task  number  tttt  specified  in  the  request  does  not 
correspond  to  an  active  job.  Either  the  job  has  already 
terminated  or  a  task  with  this  number  has  not  been 
initiated. 


D.  SWITCHES  tttt  S.  S0  .  .  .  .  S. 

12  k 

Description: 

Displays,  or  modifies  and  displays,  the  sense  switches  of  an  active  task 
where  tttt  is  the  task  number  and  S^,  S  ,  ....  S  are  the  sense  switch  bit  numbers 
that  are  to  be  changed.  The  sense  switches  are  located  in  the  task's  job  table  and 
occupy  one  word.  They  are  numbered  left  to  right  from  0  to  31.  The  appearance  of  a 
sense  switch  bit  among  the  task  parameters  causes  that  bit  to  be  complemented 
(changed  from  0  to  1  or  from  1  to  0).  The  resulting  values  of  the  sense  switches  are 
then  displayed.  If  no  sense  switch  bit  numbers  are  given,  no  changes  are  made  to 
the  sense  switches,  but  they  are  displayed. 

Console  Messages: 

1.  PARAMETER  ERROR 

At  least  one  of  the  sense  switch  bit  parameters  is  outside 
the  range  of  0-31,  or  the  task  number  tttt  is  zero. 

2.  TASK  tttt  jobname  SWITCHES  ARE 

0:  ssssssss  8:  ssssssss  16:  ssssssss  24:  ssssssss 

The  switches  for  a  specified  task  are  displayed  on  the  console 
typewriter  where  tttt  is  the  task  number,  jobname  is  the 
corresponding  job  name,  and  ssssssss  are  the  binary  values 
of  the  sense  switch  bits  (0  or  1). 
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DUMP  JOBS 


Lincoln  Laboratory  Multi -Programming  Supervisor 
Job  Operation  Instructions 
Dump  Jobs 
16  March  1966 


General  Information: 

The  dump  jobs  are  available  for  use  to  aid  in  the  debugging  of  a  job  program.  The 
dump  uses  the  BPS  single  phase  dump  routines  which  must  be  included  as  part  of  the 
supervisor.  The  dump  appears  on  the  system  output  unit  (printer  F  on  the  Model  40 
and  the  printer  on  the  Model  65). 


Dump  Jobs: 


JOBDUMP  tttt 

A  dynamic  dump  of  task  tttt, where  tttt  is  a  task  number  of  an  active  job, 
is  produced  on  the  system  output  unit.  This  job  simulates  an  SVC 
JOBDMP  (SVC  0)  for  the  active  job  to  dump  the  job  program  together  with 
its  buffers  and  the  supervisor  tables  which  contain  status  information  of  the 
job.  The  dump  produced  includes  the  JOB  LIST,  JOB  TABLES,  DEVICE 
LIST,  DEVICE  TABLES,  and  the  ENTRY  POOL,  the  CPUQ,  and  the  first 
4096  bytes  of  the  job  program  as  well  as  each  job  buffer.  This  job  is  re¬ 
entrant. 

Console  Message:  JOB  NOT  ACTIVE 

The  task  number,  tttt,  specified  in  this  request 
does  not  correspond  to  an  active  job. 


LOWCORE 

A  dump  of  the  first  1000  (hex)  bytes  of  core  is  produced  on  the  system  output 
unit.  This  area  of  core  contains  the  I/O  old  PSW,  CSW,  CAW,  and  location 
of  the  device  table  at  the  time  of  the  last  194  I/O  interrupts.  The  location 
at  which  the  last  1/ O  old  PSW  is  stored  is  indicated  in  the  half  word  at  location 
56. 

COREDUMP 

A  dump  of  core  is  produced  on  the  system  output  unit.  This  coredump  contains 
the  LOWCORE  information  as  well  as  a  dump  of  the  supervisor,  all  its  tables, 
and  all  job  programs.  This  job  is  re-entrant. 
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TAPE  MOVE 
JOBS 


Lincoln  Laboratory  Multi-Programming  Supervisor 

Job  Operation  Instructions 

Tape  Control  Jobs  (Re-Entrant) 

1  April  1966 

General  Information 

The  tape  control  jobs  include  the  following; 


FSR 

Forward  space  n  records 

BSR 

Backspace  n  records 

FSF 

Forward  space  n  files 

BSF 

Backspace  n  files 

REW 

Rewind  tape 

RUN 

Rewind  and  unload  tape 

WTM 

W  rite  n  tape  marks  (end  of  files) 

ERG 

Erase  n  records  gaps  (3/4"  of  tape/gap) 

Task  Request  Format:  JOBNAME  UNIT  PARAMETERS 

Jobname; 

Any  of  the  tape  control  job  names  listed  above. 

Unit:  Txxx 

Where  xxx  is  the  address  of  a  7-track  or  a  9-track  tape  unit. 

Parameters: 

Density:  DEN  2  (for  200  bpi)  Default:  DEN  8 

5  (for  556  bpi) 

8  (for  800  bpi) 

The  density  code  specifies  the  density  of  the  tape  on  which 
the  control  operation  is  to  be  performed. 

Count:  n  Osns  9999  Default:  1 

The  count  specifies  the  number  of  times  the  control  operation 
should  be  performed. 

The  order  of  the  parameters  is  immaterial,  i.  e.  ,  the  density  parameter  pair 
may  come  before  or  after  the  count.  If  a  parameter  is  not  specified,  the  default  con¬ 
dition  is  used. 
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Operating  Notes: 


1.  If  the  density  specified  by  the  operator  is  widely  different  from  the  true 
tape  density,  e.  g.  ,  if  800  is  specified  for  a  tape  with  a  true  density  of 
200,  the  files  and  record  spacing  operations  may  result  in  an  EQUIPMENT 
MALFUNCTION  error  message. 

2.  If  during  a  FSR  or  a  BSR  a  tape  mark  is  encountered,  the  operation  is 
terminated  and  the  remaining  number  of  records  not  skipped  are  printed 
in  a  console  message. 

3.  These  jobs  are  re-entrant.  Consequently,  the  same  operation  may  be 
initiated  for  more  than  one  tape  unit  and  run  concurrently. 

4.  The  REW  and  RUN  job  does  not  require  a  density  setting  nor  a  count 
parameter.  The  ERG  job  uses  the  count  parameter  but  does  not  require 
a  density  setting.  All  the  other  jobs  use  a  density  setting  and  a  count 
parameter. 


Examples; 

1.  FSR  T180  DEN  5  300 

Tape  180  will  be  advanced  300  records  at  a  density  of  556  bpi. 

2.  FSF  T181  15  DEN  2 

Tape  181  will  be  advanced  15  files  at  a  density  of  200  bpi. 

3.  BSF  T181  5 

Tape  181  will  be  backspaced  5  files  at  a  density  of  800  bpi. 

4.  WTM  T180 

One  tape  mark  (EOF)  will  be  written  on  Tape  180  at  a  density  of  800  bpi. 

5.  REW  T282 

Tape  282  will  be  rewound  to  load  point. 
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Console  messages: 


1.  INCORRECT  DENSITY. 

The  operator  specified  a  density  code  that  was  not  2,  5,  or  8.  These  are 
the  only  permissable  codes. 

2.  COUNT  IS  NOT  IN  BOUNDS. 

The  count  specified  by  the  operator  is  less  than  zero  or  greater  than  9999. 

3.  TAPE  UNIT  NOT  READY 

The  tape  unit  is  not  ready.  The  operation  will  remain  suspended  until  the 
unit  is  made  ready.  If  the  unit  was  in  operation  and  became  not  ready,  the 
operation  will  resume  when  the  unit  is  made  ready. 

4.  FILE  MARK  REACHED.  REMAINING  RECORDS:  n 

Tape  mark  reached  during  a  BSR  or  a  FSR  operation.  The  remaining 
records  (n)  is  the  count  specified  by  the  operator  minus  the  number  of 
records  skipped  before  the  tape  mark  was  encountered. 

5.  END  OF  TAPE 

REMAINING  COUNT:  n 

The  end  of  tape  marker  was  reached  during  a  FSR,  FSF,  WTM,  or  ERG 
operation.  The  remaining  count  (n)  is  the  count  specified  by  the  operator 
minus  the  number  of  operations  completed  successfully  before  the  end  of 
tape  marker  was  encountered. 

6.  LOAD  POINT 

REMAINING  COUNT:  n 

The  load  point  marker  was  reached  during  a  BSR  or  a  BSF.  The  remaining 
count  (n)  is  the  count  specified  by  the  operator  minus  the  number  of  records 
or  files  skipped. 
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7.  EQUIPMENT  MALFUNCTION.  SENSE  BYTES:  xxxxxxxxxx 

An  equipment  failure  was  detected.  The  sense  bytes  should  be  examined  to 
determine  the  cause  of  failure.  (See  IBM  Principles  of  Operation  for  2400 
series  tape  units.  A22-6866-1.) 

8.  Txxx  IS  IN  FILE  PROTECT  MODE.  OPERATION  NOT  EXECUTED. 

The  tape  unit  Txxx  was  found  to  be  in  file  protect  mode  when  an  attempt 
was  made  to  execute  a  WTM  or  ERG  job.  The  job  was  not  executed. 
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PRESTORE 


Revised:  10  April  1967 


Lincoln  Laboratory  Multi -Programming  Supervisor 
Job  Operating  Instructions 
Prestore  Job 
16  March  1966 
Revised  27  May  1966 


General  Information: 

PRESTORE  performs  the  task  of  recording  card  images  on  magnetic  tape.  The 
program  runs  in  two  modes;  for  the  7094  it  will  prestore  both  BCD  and  binary  card 
images  adding  the  proper  look-ahead  bits  to  each  record,  for  the  360  it  will  prestore 
EBCDIC  card  images  in  odd  parity  with  the  converter  on.  The  program  uses  the 
TPWRUC,  CDRDUC,  and  CDSTUC  routines  for  tape  and  card  unit  checks. 

Task  Request  Format:  JOBNAME  UNITS  PARAMETERS 

Jobname:  PRESTORE 

Units:  RDRr  Txxx 

Where  r  is  the  address  of  a  2540  card  reader  and  xxx  is  the 
address  of  either  a  7  or  9 -track  tape.  If  there  is  only  one 
reader  attached  to  the  system,  the  reader  unit  is  not  specified. 


Parameters: 

Density: 

DEN  2 

DEN  5 

DEN  8 

Default: 

DEN  8 

Mode: 

BCD 

Default: 

EBCD  mode 

In  the  EBCD  mode,  80  EBCDIC  characters  from  each  card  are 
recorded  on  tape  with  the  data  converter  on,  and  on  an  end -of - 
file  condition  on  the  card  reader  a  tape  mark  is  written. 


In  the  BCD  mode,  each  BCD  card  is  recorded  as  an  84  character 
BCD  record,  with  even  parity,  translator  on;  each  binary  card  is 
recorded  as  a  168  character  binary  record  with  odd  parity,  trans¬ 
lator  off;  each  end-of-file  card  is  recorded  as  a  tape  mark.  Binary 
cards  are  indicated  by  a  7-9  punch  in  column  1  and  end-of-file 
cards  are  indicated  by  a  7-8  punch  in  column  1.  An  end-of-file 
condition  on  the  card  reader  does  not  cause  a  tape  mark  to  be 
written. 
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Continuation:  MORE 


Default:  Task  Termination 


When  an  end-of-file  condition  on  the  reader  has  been  reached, 
this  parameter  causes  the  task  to  be  suspended,  i.e.,  remains 
active;  otherwise,  the  task  is  terminated  after  the  last  card  is 
written  on  tape. 


Examples: 

1.  PRESTORE  T181 

Conventional  prestoring  for  the  7094  will  be  started.  The  task 
terminates  when  the  last  card  has  been  written  and  the  end-of-file 
light  is  on. 

2.  PRESTORE  T182  EBCD  MORE 

EBCDIC  card  images  will  be  placed  onto  tape  182  with  a  tape 
mark  written  when  the  last  card  has  been  written  and  the  end- 
of-file  light  is  on.  The  task  will  remain  active,  and  can  be 
resumed  by  placing  more  cards  into  the  hopper.  In  this  mode, 
the  task  can  be  terminated  only  by  the  TERM  task. 

Console  Messages  Cf  indicates  task  terminates) 

1.  CARD  TO  TAPE  PRESTORE  PROGRAM  VERS  4. 

This  message  is  written  when  the  task  has  begun  successfully. 

2.  t  PARAMETER  ERROR 

An  erroneous  parameter  has  been  typed  in,  retry  the  task, 

3.  TAPE  UNIT  IS  NOT  READY. 

This  message  indicates  that  the  tape  unit  specified  is  not  in  the 
ready  state  at  the  start  of  the  task. 

4.  JOB  NO.  xxxxx,  nnnn  CARDS.  JOB  NO.  yyyyy  BEING  PRESTORED. 

This  message  indicates  that  JOB  xxxxx  has  been  successfully 
prestored  and  contained  nnnn  cards.  JOB  yyyyy  is  being  started. 
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5.  TAPF,  PARITY 

This  message  indicates  that  there  was  difficulty  in  writing  on  the 
tape.  If  this  message  is  repeated  many  times  a  new  tape  should 
be  mounted. 

6.  t  END  OF  TAPE  REEL 

The  end  of  tape  indicator  has  been  reached.  Mount  a  new  tape 
and  begin  with  the  last  job  to  be  prestored. 

7.  t  nnnnn  CARDS  PRESTORED 

This  is  a  count  of  the  total  number  of  cards  prestored  for 
the  task. 

8.  CARD  2  IN  STACKER  HAS  INVALID  PUNCH  IN  COLUMN  xx. 

This  message  indicates  that  a  BCD  card  has  an  invalid  punch  in 
column  xx.  The  next  to  last  card  in  stacker  2  should  be  inspected 
in  the  specified  column  and  the  condition  should  be  corrected.  This 
card  and  the  one  following,  together  with  the  cards  to  be  run  out, 
should  be  refed. 

Note:  No  error  light  on  the  reader  will  be  lit  for  this  condition. 

If  one  of  the  lights  does  come  on  CDRDUC  will  print  a  message 
and  only  those  cards  that  are  run  out  should  be  refed. 
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1 03f  Vd  3S  H  DN  fid 
Hi>Nru/ANUid 


Lincoln  Laboratory  Multi-Programming  Supervisor 
Job  Operating  Instructions 

PRINT/PUNCH/PUNCHSEP/EJECT  Jobs  (Re-entrant) 
1  April  1967 


Job  Summary: 

PRINT  processes  labeled  and  unlabeled  7  or  9-track  tapes.  7-track  tapes  may 
be  read  under  any  density  and  mode  set  specification.  9-track  tapes  force  800  bpi  and 
odd  parity.  Mixed  density  tapes  cannot  be  printed. 

PUNCH  punches  a  7-track  tape  written  in  odd  and/or  even  parity  or  a  9-track 
tape.  Cards  can  be  punched  as  column  binary,  BCD,  or  EBCDIC.  Tapes  may  be  labeled 
or  unlabeled  and  may  be  of  any  density. 

PUNCHSEP  is  like  the  PUNCH  job  except  that  two  blank  cards  from  the  reader 
are  inserted  into  the  punched  deck  whenever  an  end  of  file  or  system  output  flip  card 
is  recorded  on  the  tape. 

EJECT  restores  and/or  spaces  the  paper  on  a  printer. 

General  Information: 

TYPE  OF  TAPES  PROCESSED.  PRINT,  PUNCH  and  PUNCHSEP  process  360 
labeled  and  unlabeled  7  or  9  track  tapes  and  7094  unlabeled  7-track  tapes.  Seven  track 
tapes  may  be  read  under  any  density  and  mode-set  specification.  Nine  track  tapes 
force  800  bpi  and  odd  parity.  Mixed  density  tapes  cannot  be  processed. 

PROCESSING  OF  LABELED  TAPES.  When  processing  labeled  tapes,  only  80  byte 
records  with  VOL,  HDR,  UHL,  EOF,  UTL  or  EOV  in  bytes  1-3  are  accepted  as  standard 
labels.  If  a  non-standard  label  is  read  the  program  assumes  that  the  tape  is  positioned 
erroneously  within  the  data  set.  The  tape  is  then  backspaced  two  files  to  position  if  ahead 
of  the  header  labels,  a  message  is  typed  on  the  console  typewriter,  and  the  processing 
of  labels  is  resumed. 

SKIPPING  TO  nth  DATA  SET  ON  LABELED  TAPE.  To  skip  to  a  specific  data  set 
on  a  labeled  tape  the  forward  space  file  job,  FSF,  must  be  used  to  position  the  tape  at 
the  header  labels  preceding  the  data  set  desired.  The  number  of  files  to  skip  is  deter¬ 
mined  by  the  formula  3n-3  where  n  is  the  ordinal  number  of  the  data  set.  (To  position 
the  tape  at  the  beginning  of  the  data  set  use  the  formula  3n-2. )  The  tape  must  be  at 
load  point  before  initiating  the  FSF  job. 
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SYSTEM  OUTPUT  TAPES.  Labeled  and  unlabeled  system  output  tapes  are 
generated  under  the  Operating  System/360  and  unlabeled  system  output  tapes  created 
under  the  IBSYS  System  on  the  7094  are  supported  by  the  PRINT,  PUNCH  and  PUNCHSEP 
jobs.  When  an  OS/360  job  statement  card  image  or  an  IBSYS  "$ID"  card  image  is 
encountered,  the  PRINT  job  writes  the  inventory  number  appearing  in  each  of  these 
records  on  the  console  typewriter.  Also,  four  rows  of  asterisks  at  the  top  and/or 
bottom  of  three  pages  are  printed  to  facilitate  the  separating  of  user  job  listings.  When 
a  360  tape  is  being  punched,  161  byte  records  with  hexadecimal  "Al"  or  "A2"  as  the 
first  byte  of  the  record  are  recognized  as  flip  card  images  and  are  punched  as  column 
binary.  If  the  PUNCHSEP  job  is  in  effect  and  if  the  flip  card  record  has  "Al"  as  the 
first  byte,  two  cards  from  the  reader  precede  the  flip  card  into  the  punched  deck.  When 
a  7094  tape  is  being  punched,  odd  parity  records  of  84  bytes  or  less  with  "$JOB"  in 
bytes  1-4  are  recognized  as  7094  FORTRAN  IV  job  statement  card  images.  The  record 
is  punched  as  BCD  andif  PUNCHSEP  is  in  effect,  two  blank  cards  from  the  reader  are 
inserted  into  the  deck. 

RECORD  FORMATS.  OS/360  labeled  and  unlabeled  tapes  may  have  fixed, 
variable  and  unspecified  record  formats.  Unlabeled  7094  print  tapes  may  be  unblocked 
or  blocked  with  record  marks  as  logical  record  separators.  Unlabeled  7094  punch  tapes 
may  be  blocked  or  unblocked  for  odd  parity  and  should  be  unblocked  for  even  parity.  For 
odd  parity  records,  160  bytes  are  punched  per  card  in  column  binary  mode  and  every 
169th  byte  is  treated  as  the  first  byte  of  an  additional  logical  record  with  the  previous 
eight  bytes  ignored.  For  even  parity  records  80  bytes  are  punched  per  card  in  EBCD 
mode  with  any  excess  bytes  ignored. 

CONTROL  CHARACTERS.  Carriage  control  characters  in  either  extended  ASA 
code  or  machine  command  code  are  recognized  by  the  PRINT  program.  Records  with  no 
carriage  control  characters  are  printed  single  spaced.  For  machine  code  carriage 
control  both  write  command  and  independent  carriage  select  commands  are  permitted. 
The  two  command  types  are  executed  for  the  printer  except  that  records  containing 
independent  carriage  select  commands  are  not  printed.  The  following  ASA  codes  are 
processed: 
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CHAR 

HEX  CODE 

BLANK  (  ) 

’40' 

ZERO  (0) 

'F0' 

MINUS  (-) 

*60' 

PLUS  (+) 

’4E’ 

NUMBERS  (1-9) 

'FI*  -  ’F9' 

RESULT 

Space  1  line  immediately 

Space  2  lines  immediately 

Space  3  lines  immediately 

No-op  command;  used  for  overprinting 

Skip  to  channel  ’N'  immediately 


All  other  characters  are  overridden  by  space  1  line  immediately. 

MAXIMUM  PHYSICAL/LOGICAL  RECORD  LENGTH.  The  maximum  physical 
record  length  is  1998  bytes  for  PRINT  and  198  for  PUNCH  and  PUNCHSEP.  This  maximum 
may  be  changed  temporarily  by  using  the  CHANGBUF  program  to  alter  the  size  of  buffer 
one  and  two  before  execution.  Upon  initiation,  the  program  resets  buffer  sizes  to  2000 
(or  200)  for  subsequent  jobs  (buffer  sizes  must  be  two  more  than  the  maximum  physical 
length).  For  PRINT,  the  maximum  logical  record  length  is  132  bytes  or  133  bytes  if 
program  control  is  in  effect.  For  PUNCH  and  PUNCHSEP,  the  maximum  is  80  bytes  for 
EBCDIC  punching  and  160  bytes  for  column  binary  punching.  If  a  logical  record  exceeds 
the  maximum,  132  bytes  (80  or  160)  are  printed  per  line  (or  punched  per  card)  until  the 
logical  record  is  exhausted. 

JOB  TERMINATION.  Unless  otherwise  specified  by  the  EOF  parameter,  a  task 
is  terminated  when  three  successive  tape  marks  (end  of  files)  are  sensed  on  the  tape. 

When  processing  labeled  tapes  a  task  is  terminated  when  two  successive  end  of  files 
are  sensed  following  a  trailer  label,  or  the  words  "END  OF  OUTPUT"  appear  in  bytes 
2-14.  If  a  job  is  terminated  because  of  "END  OF  OUTPUT"  the  remaining  data  set  is 
not  printed.  Also,  if  the  DUMP  parameter  is  specified,  the  remaining  trailer  labels  and 
end  of  file  messages  are  not  printed.  If  the  FILE  parameter  is  specified,  a  task  is 
terminated  when  the  request  is  satisfied.  Also,  a  tape  mark  in  the  end  of  tape  area 
causes  job  termination. 

SYSTEM  ROUTINES.  Use  is  made  of  the  standard  system  unit  check  and  unit 
exception  routines,  TPRDUC,  PRTUC,  PRTUE,  CDRDUC,  CDPNUC,  CDSTUC  and  CDPNUE. 
The  SWITCHES  system  job  may  be  invoked  to  control  PRINT,  PUNCH  and  PUNCHSEP. 

The  terminations  accomplished  by  setting  switch  bits  one  and  two  are  "clean",  i.e. ,  they 
allow  the  job  to  be  re -initiated  without  producing  any  different  results  than  if  the  task  had 
been  allowed  to  continue.  If  a  task  which  involves  a  labeled  tape  is  terminated  by  switch 
setting  2,  the  tape  is  positioned  at  or  within  the  data  set.  Before  terminating,  the  task 
writes  a  message  on  the  console  typewriter  indicating  the  parameters  which  must  be 
listed  in  order  to  resume  the  task  properly.  Bit  seven  causes  a  task  to  suspend  immediately; 
the  task  can  be  continued  by  resetting  bit  seven.  Once  a  spacing  sense  switch  bit  has  been 
set  it  will  remain  in  effect  until  it  is  reset  and  a  new  spacing  switch  bit  is  selected. 
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Task  Request  Summary: 


-op- 

"DEN2“ 

OT 

"94TP  ~ 

DEN5 

OC 

NLBL 

(DEN8) 

EP 

(LABL) 

(ET) 

UFRM 

VFRM  [EOF  if 

FFRM  x  KEOF  3) 

(FFRM  133)  L 


PRINT  PTRp  Txxx 


FILE  n 

7  CONT  “1 

DUMP 

(all  the  tape) 

(read  label)^ 

(no  labels,  no  EOF) 

SP1 

SP2 

MAC" 

SP3 

NOC 

SPCE 

(ASA) 

(SPC) 

'END  "I  I"  JOBjjjj  "1  f  SYST  1 
kno  eject)!  j(no  skipping)]  [(syst/no  syst)] 


Sense  Switch  Bits  Used: 


0  -  terminate  immediately 

1  -  terminate  at  end  of  record 

2  -  terminate  at  end  of  file 
7  -  pause  immediately 


8  -  single  spacing 

9  -  double  spacing 

10  -  triple  spacing 

11  -  program  control 

12  -  program  control  and  eject 


PUNCH  PC  He  Txxx 


EP 

UFRM 

DEN2" 

ET 

94TP  " 

VFRM 

DEN5 

OP 

LABL 

FFRM  x 

(DEN8) 

OT 

(NLBL) 

(FFRM  80) 

(OC) 

Sense  Switch  Bits  Used: 


0  -  terminate  immediately 

1  -  terminate  at  end  of  record 

2  -  terminate  at  end  of  file 
7  -  pause  immediately 
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PUNCHSEP  RDRr  PCHc  Txxx  <j 

f  same  as  ^ 
[for  PUNCH/ 

END 

(no  insert)] 

1 

Sense  Switch  Bits  Used: 

0  -  terminate  immediately 

1  -  terminate  at  end  of  record 

2  -  terminate  at  end  of  file 
7  -  pause  immediately 


EJECT  [<6>]  [<0>] 


Sense  Switch  Bits  Used:  None 


Task  Request  Formats:  JOBNAME  UNITS  PARAMETERS 

Job  name:  PRINT 

Units:  PTRp  Txxx 

where  p  is  a  printer  address  and  xxx  is  the  address  of  a 
7  or  9- track  tape  unit. 

Jobname:  PUNCH 

Units:  PCHc  Txxx 

where  c  is  a  2540  card  punch  and  xxx  is  a  7  or  9  track  tape 
unit  address. 

Jobname:  PUNCHSEP 

Units:  RDRr  PCHc  Txxx 

where  r  is  a  2540  card  reader,  c  is  a  2540  card  punch  and 
xxx  is  a  7  or  9  track  tape  unit  address.  The  reader  and 
punch  must  be  on  the  same  2540  card  unit.  The  program 
does  not  check  for  this  requirement. 


Jobname:  EJECT 

Units:  PTRp 

where  p  is  a  printer  address. 
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Parameters:  For  the  PRINT,  PUNCH,  PUNCHSEP  jobs 


Density: 


Default:  DEN8 


DEN2  (200  bpi) 
DEN5  (556  bpi) 
DEN8  (800  bpi) 


Mode  set: 


OP 

OT 

OC 

EP 

ET 


PRINT  Default:  ET 
PUNCH,  PUNCHSEP  Default:  OC 

(odd  parity  -  converter  off  -  translator  off) 

(odd  parity  -  converter  off  -  translator  on) 

(odd  parity  -  converter  on  -  translator  off) 

(even  parity  -  converter  off  -  translator  off) 

(even  parity  -  converter  off  -  translator  on) 


For  labeled  tapes,  the  mode  set  option  is  ineffective.  All  labels  are  read  with  ET  and 
all  data  sets  are  read  according  to  label  specifications. 


Tape  Type: 


PRINT  Default:  LABL 
PUNCH,  PUNCHSEP  Default:  NLBL 


LABL  (360  labeled  tape) 
NLBL  (360  unlabeled  tape) 
94TP  (7094  tape) 


IBM  7094  print  tapes  are  read  with  converter  off,  translator  on  with  even  parity.  Records 
are  treated  as  though  written  in  unspecified  record  format  except  that  record  marks,  if 
any,  are  interpreted  as  logical  record  delineators  and  are  not  printed.  Also,  hexa¬ 
decimal  "50"  is  translated  to  hexadecimal  "4E"  due  to  the  print  chain  arrangement. 

7094  punch  tapes  may  be  written  in  odd  and/or  even  parity.  Odd  parity  records  are 
read  with  converter  off,  translator  off  and  are  punched  as  column  binary.  Even  parity 
records  are  read  with  converter  off,  translator  on  and  are  punched  as  EBCD. 


Record  format: 


FFRM  xxx 

VFRM 

UFRM 


PRINT  Default:  FFRM  133 
PUNCH,  PUNCHSEP  Default:  FFRM  80 

(fixed  record  format) 

(variable  record  format) 

(unspecified  record  format) 
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where  xxx  is  the  logical  record  length  which  may  be  any 
number  from  0  to  133.  If  xxx  is  0,  the  logical  record 
length  equals  the  physical  record  length.  The  logical 
record  length  must  be  specified  for  fixed  record  format 
only.  With  labeled  tapes  the  record  format  parameters 
are  ineffective  because  they  are  overridden  by  the  label 
specifications. 


Read  data:  Default:  read  label 

CONT 

This  parameter  is  used  when  processing  a  labeled  tape  which  initially 
is  positioned  within  a  data  set.  Because  the  job  program  cannot  obtain  label 
information  concerning  the  mode  and  record  format  in  which  the  data  set  is 
written  without  backspacing  the  tape  two  files,  a  mode  set  parameter  and  a 
record  format  parameter  must  accompany  the  CONT  parameter.  If  they  do  not, 
the  "parameter  error"  message  is  written  on  the  console  typewriter  and  the 
job  is  terminated.  A  mode  set  parameter  must  also  be  specified  when  reading 
9  track  tapes  but  it  is  ineffective.  The  CONT  parameter  is  usually  used  in 
resuming  a  job  which  was  prematurely  terminated  by  setting  sense  switch  2. 


Terminate  on  x  tape  marks:  Default:  EOF  3 

EOF  x 

where  x  may  be  any  number  from  1  through  9.  This  parameter 
causes  the  job  to  terminate  after  x  successive  tape  marks  (EOF) 
are  sensed  on  the  tape. 


Terminate  after  x  files: 
FILE  xxxx 


PRINT  Default:  all  the  tape 
PUNCH,  PUNCHSEP  Default:  FILE  1 


where  xxxx  may  be  any  number  from  1-9999.  The  file  parameter 
is  used  when  it  is  desired  to  terminate  the  job  after  printing  xxxx 
number  of  files. 

Depending  on  the  type  of  tape  being  printed  "FILE"  has  different 
meanings. 

1)  For  unlabeled  tapes  a  file  consists  of  one  or  more 
records  terminated  by  a  tape  mark. 

2)  For  IBSYS  system  output  print  tapes,  a  file  consists 
of  a  job.  An  IBSYS  job  may  or  may  not  begin  with  a 
$ID  card  image  and  is  terminated  by  either  a  tape 
mark  or  the  $ID  card  image  of  the  following  job. 
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In  1)  and  2)  multiple  end  of  files  are  counted  as  one  and  tape  marks 
at  the  beginning  of  the  tape  are  not  counted. 

3)  For  OS/360  user  labeled  output  tapes,  a  file  refers  to 
a  single  data  set. 

4)  For  OS/360  SYSOUT  print  tapes,  a  file  consists  of  all 
data  sets  belonging  to  a  job.  Each  job  is  identified  by 
the  job  statement  card. 

Additional  Parameters:  For  the  PRINT  job 

Tape  dump  simulation:  Default:  no  printing  of 

F>T I1VIP  labels;  no  indication 

of  end  of  files 

whenever  an  end  of  file  is  sensed  on  the  tape  a  row  of 
asterisks  with  the  message  "END  OF  FILE"  is  printed 
on  the  listing.  Also,  when  processing  labeled  tapes, 
all  labels  are  printed. 

Spacing:  Default:  SPC 

SP1  (single  spacing) 

SP2  (double  spacing) 

SP3  (triple  spacing) 

SPC  (program  control) 

SPCE  (program  control  and  eject  on  channel  12 
regardless  of  control  character) 

Carriage  control:  Default:  ASA 

MAC  (machine  code  carriage  control) 

ASA  (extended  ASA  carriage  control) 

NOC  (no  carriage  control) 

If  single,  double,  or  triple  spacing  is  requested,  the  carriage 
control  parameters  are  ineffective.  With  labeled  tapes,  the 
carriage  control  parameters  are  overridden  by  the  label  speci¬ 
fications. 


Card  image  tape: 
END 


Default:  no  eject  on 
"END" 


Paper  is  ejected  after  printing  an  "END  CARD"  card  image 
(END  in  bytes  10-12).  This  parameter  is  effective  only  if 
single,  double,  or  triple  spacing  is  requested.  It  is  useful 
when  printing  tapes  on  which  machine  language  source  decks 
are  pre stored. 
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Start  location: 

JOB  xxxxx 


Default:  Print  without 
skipping 


where  xxxxx  may  be  any  number  from  1-99999.  The  program 
will  skip  to  and  begin  printing  from  the  job  identified  by  inventory 
number  xxxxx.  If  the  tape  is  an  OS/360  SYSOUT  tape  the  number 
xxxxx  appears  in  bytes  4-8  and  the  word  "JOB”  in  bytes  9-11.  If 
the  tape  is  an  IBSYS  SYSOUT  tape  the  number  xxxxx  appears  in  the 
"$ID"  card  image  with  the  number  xxxxx  and  "$ID"  located  in  one 
of  3  positions  within  the  record. 


$ED 

NUMBER 

bytes 

2-4 

51-55 

bytes 

7-9 

56-60 

bytes 

13-15 

62-66 

The  inventory  number  xxxxx  consists  of  five  digits,  with  leading 
zeroes  if  necessary.  Only  the  significant  digits  need  be  specified 
in  the  parameter. 


SYSOUT  tape:  Default:  syst/no  syst 

SYST 

This  parameter  indicates  that  a  print  tape  is  an  OS/360  SYSOUT 
tape.  If  the  parameter  is  not  specified,  PRINT  will  determine  if 
the  tape  is  a  sysout  tape  by  searching  for  "SYSOUT”  in  bytes 
5-10  of  data  set  trailer  label  number  one.  This  parameter  need 
only  be  used  with  the  CONT  parameter. 


Additional  Parameters:  For  the  PUNCH  and  PUNCHSEP  jobs 

The  following  parameter  applies  only  to  the  PUNCH  and  PUNCHSEP  jobs. 

Punching  data  mode:  Default:  EBCD 

EBCD  (data  mode  1:  1  byte/card  col.) 

COLB  (data  mode  2:  column  binary,  2  bytes/card  col.) 


Additional  Parameters:  For  the  PUNCHSEP  job 

The  following  parameter  applies  to  PUNCHSEP  only. 

Card  image  tape:  END  Default:  Blank  cards 

not  inserted 

The  parameter  causes  two  blank  cards  from  the 
reader  to  be  fed  and  inserted  after  an  "END"  card 
("  END"  in  columns  9-12)  is  punched.  The  para¬ 
meter  is  used  when  punching  tapes  on  which  machine 
language  source  decks  are  prestored. 
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Additional  Parameters:  For  the  EJECT  job 

The  following  positional  parameters  apply  to  EJECT  only. 

No.  of  pages  to  eject:  Default:  6 

P 

where  p  may  be  any  number  from  0-10. 

No.  of  lines  to  space:  Default:  0 

1 

where  1  may  be  any  number  from  0-66. 

Operating  Instructions: 

1.  Whenever  a  print  job  terminates,  except  on  premature  termination  caused 
by  setting  sense  switch  2,  6  pages  are  ejected  on  the  printer. 

2.  All  punched  cards  are  directed  to  stacker  RP3.  There  is  no  option 
available  for  changing  stacker  designation.  Badly  punched  cards  are 
stacked  in  stacker  Pi.  Before  terminating,  a  blank  card  is  punched  into 
stacker  PI  to  release  the  last  card  punched  from  the  tape  into  stacker 
RP3.  Before  inserting  a  blank  card  from  the  reader  into  the  punched  deck 
when  an  end  of  file  is  sensed  on  the  tape,  PUNCHSEP  also  punches  a 
blank  card  into  stacker  Pi  to  release  the  last  card  into  stacker  RP3. 

3.  When  PUNCHSEP  is  used,  cards  in  the  reader  and  punch  hoppers  should 
be  of  contrasting  colors. 

Examples: 

1.  PRINT  PTRE  T183 

The  tape  on  unit  183  is  assumed  to  be  an  OS/360  labeled  tape  of  density  800. 

Labels  are  read  in  even  parity,  translator  on  and  data  sets  are  read  and  printed 
according  to  label  specifications.  The  tape  is  printed  on  printer  E  under  program 
control  and  the  job  terminates  when  three  successive  end  of  files  are  sensed  on 
the  tape,  when  two  end  of  files  are  sensed  following  a  trailer  label,  or  the  words 
"END  OF  OUTPUT"  appear  in  bytes  2-14.  (9-track  tapes  force  800  bpi  and  odd 
parity. 

2.  PRINT  PTRF  T280  JOB  437  FILE  1  DUMP  SP1 

Tape  on  unit  280  is  read  as  a  360  labeled  tape  and  searched  for  job  437.  If  found, 
one  file  (i.  e. ,  one  job)  is  printed  single  spaced  on  printer  F.  All  labels  are 
printed  and  all  end  of  files  are  indicated  on  the  listing. 
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3.  PUNCH  PCHB  T182 

Tape  on  unit  183  is  read  at  800  bpi,  converter  on,  translator  off  (7-track  only). 
The  tape  is  assumed  to  be  unlabeled  with  records  in  fixed  record  format  with  80 
bytes  per  logical  record.  The  tape  is  punched  on  punch  B  and  the  job  terminates 
when  a  tape  mark  is  sensed,  i.e.,  one  file  is  completed. 

4.  PUNCHSEP  RDRC  PCHD  T181  94TP  FILE  100 

Tape  on  unit  181  is  punched  as  a  7094  tape.  Odd  parity  records  are  punched  as 
column  binary;  even  parity  records  are  punched  as  EBCD.  If  any  flip  cards  are 
found  or  tape  marks  are  sensed  two  blank  cards  from  the  reader  are  inserted  into 
the  punched  deck.  The  job  terminates  after  processing  100  files  or  upon  sensing 
3  successive  end  of  files. 

5.  EJECT  PTRF 

6  pages  are  ejected  on  printer  F. 

6.  EJECT  PTRF  0  33 

The  paper  on  printer  F  is  spaced  33  lines. 

Console  Messages:  For  the  PRINT,  PUNCH  and  PUNCHSEP  jobs 
(t  indicates  task  terminates) 

All  console  messages  are  preceded  by  the  printer  or  punch  unit  ID  and  the  tape  unit  ID. 
For  example: 

--PTRE  T181--END  OF  TAPE 
--PCHB  T181--END  OF  TAPE 

If  only  one  printer  or  punch  is  attached  to  the  system,  the  ID  is  not  typed.  For  example: 

--T181--END  OF  TAPE 

1.  t  PARAMETER  ERROR 

An  improper  parameter  was  specified. 

2.  t  ENLARGE  BUFFERS  1  AND  2 

Typed  whenever  a  tape  record  exceeds  input  buffer  size.  Buffer  sizes  can  be 
enlarged  by  using  the  CHANGBUF  program.  Buffers  1  and  2  must  be  of  equal 
size. 
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3.  t  CANNOT  ALTER  SIZE  OF  BUFFER  3- -REINITIATE  JOB 

Buffer  3  is  a  DSECT  area  and  should  not  be  changed  by  the  CHANGBUF  program. 

4.  t  END  OF  TAPE 

A  tape  mark  in  the  end  of  tape  area  was  sensed. 

5.  t  MACHINE  ERROR  ON  BACKSPACE  UC 

Invalid  unit  check  indication  was  received  while  attempting  to  backspace  tape. 

6.  t  END  OF  JOB 

Typed  whenever  the  print  job  is  terminated  by  the  SWITCHES  job. 

7.  t  END  OF  OUTPUT 

Typed  whenever  two  end  of  files  are  sensed  following  a  trailer  label  or  the  words 
"END  OF  OUTPUT”  are  recognized  in  columns  2-14. 

8.  t  xxx  FILES  COMPLETED 

Typed  when  a  request  invoked  through  the  file  parameter  has  been  satisfied. 

The  number  xxx  is  the  number  specified  in  the  file  parameter. 

9.  tx  END  OF  FILES 

x  successive  end  of  files  were  sensed  on  tape.  If  the  EOF  parameter  is  not  used, 
the  job  is  terminated  on  3  end  of  files  (EOF  3). 

10.  t  TO  REINITIATE,  MUST  SPECIFY:  CONT  mode  set  format  (system)  (control) 

The  above  message  is  typed  when  a  job  which  involves  a  labeled  tape  is  pre¬ 
maturely  terminated  by  setting  sense  switch  2.  The  parameters  listed  in  the 
message  are  the  parameters  which  must  be  specified  when  resuming  the  job. 

The  SYSTEM  parameter  is  specified  in  the  message  only  if  the  print  tape  is  a 
SYSOUT  tape.  A  carriage  control  parameter  is  specified  only  if  the  data  set  has 
MAC  or  NOC  carriage  control.  Any  parameters  which  were  specified  in  the 
initial  job  request  and  which  do  not  appear  in  the  message  must  also  be  specified 
when  resuming  the  job,  e.g. ,  the  spacing,  JOB,  or  EOF  parameters. 

11.  TAPE  PARITY 

When  a  parity  error  is  detected  while  reading,  the  record  is  reread  10  times.  If 
the  error  still  exists  the  record  is  accepted  as  read  and  the  above  message  is  typed. 
If  the  record  in  error  is  to  be  printed  the  following  message  appears  in  the  listing: 

****PAR1TY  ERROR  IN  READING  NEXT  RECORD  AFTER  10  RETRIES**** 
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42. 


TAPE  POSITIONED  INCORRECTLY.  BACKSPACED  2  FILES 

Typed  whenever  a  non-standard  label  is  found  while  processing  labeled  tapes. 


Additional  Console  Messages:  For  the  PRINT  job 
4.  REPEATING  PRINT  LINES 

The  PRINT  program  checks  for  consecutively  repeating  print  lines.  If  a  line  is 
repeated  more  than  65  times  the  above  message  appears  on  the  console  typewriter 
and  the  remaining  repeating  lines  are  not  printed.  A  count  of  how  many  times  the 
line  is  repeated  is  obtained  and  when  the  repetitions  are  through  the  following 
messages  are  printed  on  the  listing: 

I  I  I  II  II  IHABOVE  LINE  REPEATED  xxxxxxxxxxTIMES.  ONLY  66  LINES  PRINTED.  I  I  I  I  I  I  It  I  I 

where  xxxxxxxxxx  is  the  number  of  repetitions.  Thereafter,  the  job  resumes 
regular  printing. 

2.  t  MAXIMUM  NUMBER  OF  LINES  REPEATED.  JOB  TERMINATED. 

A  print  line  has  been  repeated  hexadecimal  FFFFFFFF  times. 

3.  JOB  xxxxx  STARTED 

Whenever  a  new  job  is  started,  its  inventory  number  xxxxx  as  found  in  the  OS/360 
job  statement  card  image  or  the  IBSYS  $ID  card  image  is  typed. 

Additional  Console  Messages:  For  the  PUNCH  job 

1.  FORTRAN  IV  FLIP  CARD.  SHOULD  REQUEST  PUNCHSEP  JOB. 

TO  CONTINUE,  STOP  AND  START  PUNCH. 

PUNCHSEP  should  be  used  when  punching  7094  SYSOUT  tapes.  When  PUNCHSEP 
is  used,  punching  will  remain  a  continuous  operation  by  having  blank  cards  read 
from  the  reader  delineate  job  decks. 

Additional  Console  Messages:  For  the  PUNCHSEP  job 

1.  READER  NOT  READY 

The  last  card  has  been  read  in  the  reader. 

2.  CARDS  IN  READER  NOT  BLANK 

A  non-process  run-out  on  the  reader  should  be  performed,  the  hopper  filled 
with  blank  cards  and  the  reader  made  ready. 
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3.  t  CARD  STACK  UE 

A  unit  exception  on  a  feed  and  select  stacker  operation  has  occurred.  This 
indicates  machine  error  and  the  CE  should  be  notified. 

Additional  Console  Messages:  For  the  EJECT  job 
1.  T  PARAMETER  ERROR 

A  faulty  parameter  was  specified. 
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TPCHECK 


Lincoln  Laboratory  Multi-Programming  Supervisor 
Job  Operating  Instructions 
TPCHECK  Job  (Re-entrant) 

1  April  1967 


Job  Summary: 

The  TPCHECK  job  examines  a  7-track  or  a  9-track  tape  for  parity  errors  and 
converter  checks,  lists  sense  information  on  a  permanent  read  error,  switches  parity 
from  even  to  odd  (or  odd  to  even)  if  necessary,  recording  the  location  and  number  of 
switches,  and  determines  the  number  of  bytes  per  record  and  records  per  file. 

General  Information: 

The  TPCHECK  job  lists  on  the  console  typewriter 

1.  the  location  (file  and  record)  of  parity  errors  and 
converter  checks. 

2.  the  number  of  records  per  file. 

3.  the  number  of  records  with  parity  errors  and 
converter  checks  per  file. 

4.  the  number  of  switches  to  odd  or  even  parity  per 
file. 

5.  optionally,  the  number  of  bytes  per  record. 

6.  optionally,  the  sense  information  on  a  permanent 
read  error. 

7.  optionally,  the  location  (file  and  record)  of  parity 
switches. 


The  channel  command  word  (CCW)  for  reading  the  tape  has  the  skip  bit  (bit  35)  set 
to  surpress  the  transfer  of  data  from  the  channel  to  main  storage.  The  system  TPRDUC 
routine  is  used.  Unless  the  mode  set  parameter  EO  is  specified,  no  attempt  is  made 
at  rereading  the  tape  when  a  parity  error  occurs. 


Task  Request  Summary: 

TPCHECK  Txxx 


’eo' 

DEN2 

OC 

FILE  x" 
(FILE  1) 

DEN5 

(DEN8) 

OP 

(EP) 

"RCL 

SENS 

(no  RCL) 

(no  sense  listed) 
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Task  Request  Format: 

Jobname:  TPCHECK 

Unit:  Txxx 

where  xxx  is  a  tape  unit  address. 


Parameters: 

Density: 

DEN2 

(200  bpi) 

Default:  DEN8 

DEN5 

(556  bpi) 

DEN8 

(800  bpi) 

Mode  Set: 

Default:  EP 

EP  (even  parity,  converter  off,  translator  off) 

OP  (odd  parity,  converter  off,  translator  off) 

OC  (odd  parity,  converter  on,  translator  off) 

EO  (EP  or  OP,  whichever  is  successful) 

The  OC  mode  set  is  included  so  that  converter  check  errors  may  be  detected. 

The  EO  parameter  is  used  in  reading  a  mixed  mode  tape  or  a  tape  whose  parity  is 
unknown.  When  a  permanent  read  error  occurs,  the  EO  parameter  causes  the  record  in 
error  to  be  reread  with  the  mode  set  switched  from  EP  to  OP  or  OP  to  EP,  depending  on 
which  mode  set  is  currently  in  effect.  If  the  reread  is  successful,  the  location  (file  and 
record)  of  the  parity  switch  is  indicated  on  the  console  listing  and  the  job  continues  reading 
the  tape  in  the  new  mode.  If  the  retry  attempt  in  the  new  mode  proves  unsuccessful,  the 
record  is  reread  in  the  original  mode.  If  the  error  persists,  the  record  is  accepted  as 
read  and  the  "parity  error"  message  appears  on  the  console  typewriter.  The  job  continues 
reading  the  tape  in  the  original  mode.  Initially,  the  tape  is  read  with  the  mode  set  to  EP. 

No.  of  files:  Default:  FILE  1 

FILE  x 

where  x  may  be  any  number  from  1  through  99999. 


Default:  no  record 

length  listed 

When  the  RCL  parameter  is  specified,  the  number  of  bytes  in  each  record  is 
printed  on  the  console  typewriter.  The  size  of  the  largest  record  which  TPCHECK  will 
process  is  65,  534  bytes.  If  the  length  of  a  record  exceeds  the  maximum,  a  message  will 
appear  at  the  console  and  the  job  will  continue  with  the  next  record. 


Record  length  listed: 
RCL 
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Sense  listed  on  parity  error:  Default:  no  listing  of 

SENS  sense  information 

If  a  permanent  read  error  occurs  the  sense  information  is  written  in  hexadecimal 
on  the  console  typewriter.  All  six  sense  bytes  are  listed.  For  a  description  of  the  sense 
bytes,  refer  to  the  IBM  2401,  2402,  2403,  2404,  and  2816  Model  1  Principles  of  Operation 
Manual,  A22-6866-2. 

Examples: 

1.  TPCHECK  T181 

One  file  is  read  and  the  ordinal  numbers  of  any  record  in  which  a  parity  error 
occurs  is  listed.  Also,  the  total  number  of  records  in  the  file  and  the  total 
number  of  records  with  parity  errors,  converter  checks,  and  parity  switches 
in  the  files,  are  listed. 

2.  TPCHECK  T181  DEN5  OP  FILE  3  RCL 

Same  as  in  example  1  except  that  3  files  are  read  at  556  bpi  with  odd  parity, 
converter  off,  translator  off,  and  the  number  of  bytes  in  each  record  is  listed. 

3.  TPCHECK  T181  EO  SENS 

Same  as  in  example  1  except  that  the  sense  information  is  listed  on  the  console 
typewriter  whenever  a  permanent  read  error  occurs.  Also,  the  tape  is  read 
with  EP  or  OP  whichever  is  successful.  If  neither  mode  set  is  successful,  the 
record  is  accepted  as  a  permanent  error  record. 

Console  Messages:  (f  Indicates  task  terminates) 

1.  END  OF  FILE  xxxxx,  NO.  RCS.  =  yyyyy,  NO.  PARITY  ERRS  =  zzzzz, 

NO.  CONV  CKS  =  vww,  NO.  PARITY  SWTS  =  wwwww. 

At  the  end  of  each  file,  the  total  number  of  records  in  the  file,  and  the  number 
of  records  with  parity  errors,  converter  checks,  and  parity  switches  in  the  file 
are  listed. 

2.  RCL.  =  bbbbb,  FILE  NO.  =  xxxxx,  RC.  NO.  =  yyyyy. 

If  the  RCL  parameter  is  specified,  this  message  is  printed  after  each  record  is 
read  to  indicate  the  number  of  bytes  in  the  record. 

3.  RCL.  EXCEEDS  65,  534,  FILE  NO.  =  xxxxx,  RC.  NO.  =  yyyyy. 

The  above  message  is  printed  if  the  RCL  parameter  is  specified  and  the  length 
exceeds  65,  534. 
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4.  CONVERTER  CHECK,  FILE  NO.  =  xxxxx,  RC.  NO.  =  yyyyy. 

Whenever  a  converter  check  is  detected,  the  above  message  is  typed. 

5.  PARITY  ERROR,  FILE  NO.  =  xxxxx,  RC.  NO.  =  yyyyy. 

This  message  is  printed  whenever  a  parity  error  is  detected  in  a  record  and 
the  SENS  parameter  is  not  specified. 

6.  PARITY  ERROR,  FILE  NO.  =  xxxxx,  RC.  NO.  =  yyyyy. 

SENSE  =  xxxxxxxxxxxx. 

The  above  message  is  typed  when  a  permanent  read  error  occurs  and  the  SENS 
parameter  has  been  specified. 

7.  PARITY  SWITCHED  TO  xx,  FILE  NO.  =  yyyyy,  RC.  NO.  =  zzzzz. 

If  the  EO  parameter  is  specified,  the  above  message  is  typed  at  the  console 
whenever  the  parity  is  switched.  The  field  xx  is  either  EP  or  OP,  to  indicate 
the  parity  in  which  the  tape  was  last  read. 

8.  t  PARAMETER  ERROR. 

When  an  invalid  parameter  is  typed  the  above  message  is  listed  and  the  job  is 
terminated. 
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SETFILE 
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Lincoln  Laboratory  Multi -Programming  Supervisor 
Job  Operating  Instructions 
Tape  Copy  Job  (TPCOPY) 

(Re-entrant) 

1  April  1967 


Job  Summary: 

TPCOPY  performs  copy  and/or  comparison  of  7-  or  9-track  tapes  under  the 
Multi- Programming  Supervisor.  Options  are  available  for  selecting  parity,  density, 
number  of  files,  and  use  of  the  data  converstion  feature. 


General  Information: 

Tapes  should  be  positioned  and  readied  before  task  initiation.  Rewinding  of 
units  is  only  done  by  the  program  between  the  copy  and  compare  phases  of  a  task  that 
calls  for  both  phases.  Thus,  copying  or  comparing  of  individual  portions  of  a  tape 
(a  number  of  files)  to  or  from  different  reels  may  be  performed  as  successive  tasks 
without  losing  tape  position. 

Performing  a  copy  or  compare  on  tapes  which  do  not  provide  multiple  tape  marks 
as  an  end-of-data  indication  (e.g. ,  most  PRESS  tapes)  may  result  in  trying  to  read  blank 
tape  or  an  old  recording.  For  this  reason,  it  is  desirable  to  specify  the  number  of  files 
when  initiating  a  task. 


Task  Request  Summary: 


TPCOPY  Txxx  Tyyy 


DEN  2 

DEN  5 


"TASK  COPY' 
TASK  COMP 

Tin  xxxxx*] 

[OUT  yyyyy  1 

[EOF  n  1 

)l 

(TASK  BOTH) 

pn  — i 

[(OUT - )J 

[(EOF  all)J 

PAR  ODD 


!  pTRANON  "I 

[CON  ON  1 

)J  [(TRAN  OFF)J 

[(CON  OFF )J 

rMSGS  OFF"!  PrRYSn]  [BUFFs  “I 
[(MSGS  ON)  J  |(TRYS  5)J  pUFF  2048)J 
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JOBNAME  UNITS  PARAMETERS 


Task  Request  Format: 

Jobname:  TPCOPY 


Units: 


Parameters: 


Txxx  Tyyy 

Where  xxx  is  the  input  tape  unit  number  and  yyy  is  the  output  tape 
unit  number.  The  tape  units  should  be  made  ready  before  task 
initiation. 

Any  number  of  parameter  pairs  (name  value)  from  the  list  below 
may  be  specified.  Parameter  pairs  may  be  in  any  sequence;  and, 
if  two  or  more  parameter  pairs  contain  the  same  name,  the  value 
given  in  the  last  pair  is  used.  The  following  parameters  have 
precedence: 

1.  Requesting  TRANslator  ON  overrides  any  converter 
specification  regardless  of  sequence  and  results  in  obtaining 
CONverter  Off.  In  this  case,  the  current  program  also  forces 
even  parity. 

2.  Requesting  CONverter  ON  overrides  any  parity 
specification  regardless  of  sequence  and  results  in  obtaining  odd 
parity. 

If  a  parameter  pair  is  not  specified,  the  default  value  is  assumed. 


Parameter 


Name 


Values 


Default  Value 


1.  Density  DEN  2  (200  bpi)  8 

5  (556  bpi) 

8  (800  bpi) 

Copying  from  7-track  to  7-track  and  specifying  a  density  parameter 
value  causes  the  input  tape  to  be  read  and  the  output  tape  to  be  written 
with  the  requested  density. 

Copying  from  7-track  to  9-track  and  specifying  the  density  parameter 
results  in  reading  the  7-track  tape  with  the  requested  density'  and  writing 
the  9-track  tape  with  800  bpi. 

Copying  from  9-track  to  7-track  and  specifying  the  density  parameter 
results  in  reading  the  9-track  tape  at  800  bpi  and  writing  the  7-track 
tape  with  the  requested  density. 

Copying  from  9-track  to  9-track  forces  800  bpi. 
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Parameter 

Name 

Values 

Default  Value 

2. 

Task  to  be 

TASK 

COPY 

BOTH 

performed 

COMP 

BOTH 

COPY  will  do  a  copy  only;  COMP  will  only  compare  the  two  tapes,  whereas 
BOTH  will  do  a  copy,  rewind  both  units,  and  then  compare  the  tapes  for 
identical  contents. 


3.  Input  reel  no.  IN  xxxxx  - 

Where  xxxxx  is  any  string  of  symbols  containing  at  least  one  letter.  Only 
the  last  four  characters  will  be  used  to  form  the  input  lable.  The  default 
value  is  four  underline  ( _ )  characters. 

4.  Output  reel  no.  out  yyyyy  - 

Where  yyyyy  is  any  string  of  symbols  containing  at  least  one  letter.  Only 
the  last  four  characters  will  be  used  to  form  the  output  label.  The  default 
value  is  four  underline  ( _ )  characters. 

5.  Number  of  files  EOF  n  all 

Where  0  <  n  ^  99999.  If  the  default  is  used,  all  files  on  the  input  reel 
are  copied  (see  terminating  rules). 

6.  Parity  PAR  ODD  BOTH 

EVEN 

BOTH 

Copying  from  7-track  to  7-track  and  specifying  a  parity  parameter  value 
causes  the  input  tape  to  be  read  and  the  output  tape  to  be  written  with  the 
requested  parity. 

Since  ODD  parity  is  always  implied  for  9-track  units,  copying  from 
7-track  to  9-track  or  from  9-track  to  7-track  results  in  operating  on  the 
9-track  tape  with  odd  parity  and  the  7-track  tape  with  the  requested  parity. 

If  a  value  of  BOTH  is  used,  the  program  will  switch  parity  as  required  for 
the  7-track  tapes  only.  However,  if  the  9-track  unit  is  the  input,  the 
program  will  inhibit  any  parity  switching  on  the  7-track  output  unit  even 
if  the  parity  parameter  value  is  BOTH. 
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Parameter 

Name 

Values 

Default  Value 

7. 

Data  converter 

CON 

ON 

OFF 

OFF 

In  copying  from  7-track  to  7-track,  the  data  converter  should  be  ON  only 
if  the  7-track  input  tape  had  been  generated  originally  with  the  data  con¬ 
verter  on.  Specifying  the  data  converter  parameter  value  ON  results  in 
reading  and  writing  the  7-track  input  and  output  tapes  with  the  converter  on. 

Copying  from  a  7-track  unit  to  a  9-track  unit  with  data  converter  off 
(default  condition)  will  result  in  padding  each  output  tape  byte  with  two 
additional  zero  bits.  Although  the  copy  and  compare  operations  proceed 
normally,  the  resulting  output  tape  is  not  in  a  typically  useful  form.  When 
the  data  converter  is  on,  odd  parity  is  forced  on  the  7-track  unit.  Thus, 

7-  to  9-track  copying  would  normally  be  done  only  for  odd  parity  input 
(binary  tape)  and  with  the  converter  on. 

Copying  from  a  9-track  unit  to  a  7-track  unit  and  specifying  CONverter  ON 
results  in  reading  the  9-track  tape  with  ODD  parity  (converter  off  and 
translator  off)  and  writing  the  7-track  output  tape  with  converter  on, 
odd  parity.  Data  converter  OFF  is  always  implied  for  9-track  units. 

8.  Translator  TRAN  ON  OFF 

OFF 

Copying  from  7-track  to  7-track  and  specifying  the  TRANslator  ON  para¬ 
meter,  results  in  reading  the  input  tape  and  writing  the  output  tape  with 
the  translator  on. 

Since  TRANslator  OFF  is  always  implied  for  9-track  units,  when  copying 
from  7-track  to  9-track,  from  9-track  to  7-track,  or  from  9-track  to 
9-track,  the  TRANslator  ON  parameter  only  affects  the  7-track  tape. 

9.  Messages  MSGS  ON  ON 

OFF 

Messages  controlled  by  this  parameter  are  concerned  with  the  tape 
records.  These  messages  appear  on  the  console  typewriter. 

10.  Retries  TRYS  n  5 

Where  0  ^  n  ^  15  and  specifies  the  number  of  times  to  retry  reading  a 
record  that  has  been  read  with  error. 
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Parameter 

Name 

Values 

Default  Value 

11. 

Change  of 

BUFF 

s 

2048 

buffer  size 

Where  s  specifies  a  new  buffer  size  is  bytes.  This  buffer  size  takes 
effect  on  the  next  initiation  of  the  job. 


Examples: 

1.  TPCOPY  T181  T280  IN  LL6039  OUT  LL401A 

Copies  and  compares  all  files  from  unit  181  (reel  designated  6039)  to  unit 

280  (reel  designated  401A)  at  800  bpi,  converter  off,  translator  off  and  switching 

parity  as  required. 

2.  TPCOPY  T182  T181  TASK  COPY  EOF  5  DEN  5  PAR  EVEN 

Copies  five  files  from  unit  182  to  unit  181  at  556  bpi  with  even  parity  and  converter 
off  and  translator  off. 

3.  TPCOPY  T283  T281  CON  ON  DEN  2 

Copies  and  compares  all  files  from  unit  283  (7-track)  to  unit  281  (9-track)  reading 
from  283  with  converter  on  and  odd  parity  enforced  at  200  bpi  and  writing  on  281 
with  odd  parity  (converter  off  and  translator  off)  at  800  bpi. 

4.  TPCOPY  T283  T280  BUFF  3000 

Sets  TPCOPY  program  to  accept  records  up  to  3000  bytes  long  on  its  next 
initiation  (see  Changing  Buffer  Size). 

Terminating  Rules: 

The  copy  or  compare  phases  terminate  at  whichever  one  of  the  following  occurs 

first: 

1.  Specified  number  of  files  (if  EOF  parameter  is  given). 

2.  Five  or  more  successive  tape  marks. 

3.  A  tape  mark  is  read  in  the  input  tape  end-of-reel  area. 

4.  End-of-reel  is  reached  on  the  output  tape. 

Console  Messages:  (T  implies  the  task  terminates) 

(* indicates  that  message  printing  is  controlled  by  the  MSGS  parameters) 

1.  t  FAULTY  PARAMETER 

An  invalid  parameter  name  or  value  has  been  specified;  check  the  list  above  and 
re-initiate  task. 
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2.  t  UNIT  NOT  READY 

Ready  units  and  re-initiate  task. 

3.  t  OUTPUT  UNIT  FILE  PROTECTED 
Unprotect  output  tape  reel  and  re-initiate  task. 

4.  INPUT  IS  FROM  9- TRACK  UNIT 

Warning  message;  see  Data  Converter  and  Nine- Track  Unit  Operations  below 
for  reasonable  parameter  values. 

5.  OUTPUT  IS  ON  9-TRACK  UNIT 

Warning  message;  see  Data  Converter  and  Nine-Track  Unit  Operations  below 
for  reasonable  parameter  values. 

6.  TAPE  COPY,  VERSION  3  (1-66)  INPUT _ OUTPUT _ 

Indicates  acceptance  of  the  parameters  and  beginning  of  the  tape  operations. 

7.  COPY  PHASE 

Indicates  initiation  of  the  copy  phase  of  the  operations. 

8.  *  END  OF  FILE  NO. _ ,  NO.  RCS.  = _ 

One  or  more  consecutive  tape  marks  encountered;  the  number  of  records 
indicated  are  the  count  from  the  last  occurrence  of  this  condition  or  from 
the  starting  point;  this  message  only  occurs  during  the  copy  phase. 

9.  *  PARITY  SWITCHED  RC.  NO.  = _ 

Program  switched  parity  in  attempting  to  read  a  record  without  error  (done 
only  if  parity  parameter  value  is  BOTH). 

10.  *  EXCESSIVE  LENGTH  RECORD  RC.  NO.  = _ 

The  record  read  was  too  large  for  the  program  buffer;  the  buffer  sized  portion 
is  accepted  for  copying  or  comparison;  to  process  the  tape  correctly,  the  task 
should  be  re -initiated  with  an  increase  in  buffer  size  (see  Changing  Buffer  Size). 

11.  LAST  FILE  TRUNCATED 

Indicates  incomplete  file  copied  due  to  the  output  tape  being  filled  before  input 
tape  emptied;  a  terminating  tape  mark  is  written  on  the  output  tape;  terminates 
the  copy  phase  and,  if  task  parameter  value  is  copy,  terminates  the  task. 
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12.  INPUT  TAPE  COPIED,  INPUT  OUTPUT  ,  END  ON  (reason), 

TOTAL  NO.  OF  RECORDS  = _ ,  NO.  OF  CONVERTER  CHECKS  = 

NO.  OF  BAD  RECORDS  =  ,  NUMBER  OF  LONG  RECORDS  = 

NUMBER  OF  TIMES  PARITY  CHANGED  = _ . 

Indicates  normal  completion  of  the  copy  phase  and,  if  task  parameter  value  is 
copy,  completion  of  the  task;  the  possible  values  of  (reason)  corresponds  to  the 
terminating  rules  and,  are  as  follows: 

a)  SPECD  NO.  FILES 

b)  MULT.  TAPE  MARKS 

c)  FULL  REEL  COPIED 

d)  OUTPUT  UNIT  FULL 

The  total  number  of  records  copied,  the  total  number  of  converter  checks,  bad 
records,  and  the  total  number  of  long  records  and  number  of  times  the  parity  has 
changed  is  given. 

13.  COMPARE  PHASE 

Indicates  initiation  of  the  comparison  phase  of  the  operations. 

14.  *  FAULTY  COMPARISON  RC.  NO.  = _ 

Indicates  the  size  or  contents  of  the  input  and  output  records  do  not  match;  this 
message  occurs  only  during  the  compare  phase;  if  this  same  record  did  not 
result  in  the  "READ  WITH  ERROR"  message  during  the  copy  phase,  the  com¬ 
parison  should  be  considered  invalid  (the  tape  should  be  re-compared  or  possibly 
re-copied). 

15.  t  TERMINAL  COUNTS  DO  NOT  CHECK  RC.  NO.  = _ _ 

Indicates  that  the  number  of  records  and/or  number  of  files  processed  during 
the  compare  phase  did  not  agree  with  those  from  the  copy  phase  (occurs  under 
task  parameter  value  both  only). 

16.  t  COMPARISON  COMPLETE,  TOTAL  NO.  OF  RECORDS  = _ ,  NO.  OF  FAULTY 

COMPARISONS  = _ ,  NO.  OF  CONVERTER  CHECKS  = _ ,  NO.  OF  BAD 

RECORDS  =  ,  NUMBER  OF  LONG  RECORDS  =  ,  NUMBER  OF  TIMES 

PARITY  CHANGED  = _ . 

Indicates  normal  completion  of  the  compare  phase  and  the  task.  The  total  number 
of  records  compared,  the  total  number  of  faulty  comparisons,  the  total  number  of 
converter  checks,  bad  records,  long  records,  and  the  number  of  times  the  parity 
has  changed  is  given. 
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17.  t  INPUT  UNIT  NOT  AVAILABLE 
This  message  is  given  in  two  cases: 

1)  if  the  unit  becomes  unavailable  during  rewind;  press  START 
on  the  tape  unit  to  continue  with  rewind  and  comparison. 

2)  if  the  input  unit  becomes  unavailable  during  the  copy  or  compare 
process  and  the  resulting  tape  position  is  uncertain  (e.g. ,  during 
data  transfer);  if  this  occurs  in  the  copy  phase,  a  terminating  tape 
mark  is  written  on  the  output  unit;  in  this  case  the  task  is  term¬ 
inated  and  should  normally  be  re-initiated  from  the  beginning. 

18.  t  OUTPUT  UNIT  NOT  AVAILABLE 

Same  as  above  except  no  tape  mark  can  be  written  for  case  2. 

19.  *  READ  WITH  ERROR  RC.  NO.  = _ 

Program  was  unable  to  read  a  record  without  error;  program  accepts  the  bad 
record  image  for  copying  or  comparison  as  re-read  with  the  original  parity. 

20.  TAPE  Txxx  NOT  READY 

The  indicated  unit  has  become  unavailable  during  the  copy  or  compare  process 
without  loss  of  tape  position  information;  press  START  on  the  tape  unit  to  allow 
the  task  to  proceed. 

21.  TERROR  ON  (operation) 

Possible  value  of  "operation"  here  are  SENSE,  MODE  SET,  BACKSPACE,  and 
REWIND;  indicates  possible  machine  error  (CE  should  be  notified);  task  is 
terminated  and  should  be  re-initiated. 

22.  *  CONVERTER  CHECK  RC.  NO.  = _ 

A  converter  check  results  from  reading  a  7-track  tape  with  converter  on  when 
the  number  of  characters  read  cannot  be  stored  in  an  integral  number  of  bytes. 
For  further  information  refer  to  IBM  2401,  2402,  2403,  2404,  and  2816  Model  1 
Principles  of  Operation  Manual,  A22-6866. 

Additional  Console  Messages: 

Other  terminating  messages  may  be  generated  by  the  standard  tape  unit  check 
routines  which  are  used  by  this  program  if  unresolvable  I/O  errors  occur.  Refer  to  the 
description  of  the  Tape  Unit-Check  Routine  for  the  interpretation  of  these  messages. 
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Changing  Buffer  Size: 


The  use  of  the  parameter  pair  (BUFF  n)  at  task  initiation  causes  the  TPCOFY 
program  to  require  data  buffers  n  bytes  long  on  its  next  initiation.  Thus  to  copy  or 
compare  a  tape  with  records  larger  than  the  standard  buffer  size  (now  2048  bytes) 
requires  issuing  two  task  initiation  requests,  one  to  change  the  buffer  size  and  one  to 
execute  with  the  new  buffer  size.  Subsequent  task  initiations  will  revert  back  to  the 
standard  buffer  size.  The  value  n  is  not  accepted  as  valid  if  it  exceeds  the  system's 
maximum  buffer  size.  However,  even  if  n  is  not  greater  than  the  system's  maximum 
buffer  size,  two  buffers  of  n  bytes  may  not  be  available  (due  to  current  use  by  other 
tasks).  In  this  case,  no  further  initiation  of  TPCOFY  tasks  will  be  possible  until  two 
buffers  of  size  n  become  available.  If  this  situation  occurs,  the  buffers  can  be  changed 
to  a  smaller  size  using  the  CHANGBUF  job. 

Changing  Density/Parity  of  7-Track  Tapes: 

Copying  with  data  converter  off  provides  one  way  of  copying  a  7-track  tape 
onto  another  7-track  tape  at  a  different  parity  or  density  in  two  steps: 

1.  7-track  to  9-track  at  the  original  parity  and  density 

2.  9-track  to  7-track  at  the  new  parity  and  density. 
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T7DUMP 


Lincoln  Laboratory  Multi -Programming  Supervisor 
Job  Operating  Instructions 
BCD/Binary  Tape  Dump 
Revised  25  November  1966 


General  Information: 

The  T7DUMP  job  dumps  a  7 -track  tape  generated  on  the  1401  or  7094  in  BCD 
or  Octal  format.  This  job  replaces  the  function  previously  performed  on  the  1401 
with  the  BCD/Binary  dump  tape  program.  T7DUMP  also  dumps  in  octal  format,  an 
even  parity  7 -track  tape. 

Options  such  as  mode  of  tape,  density  of  tape,  or  number  of  files  to  be  dumped 
may  be  specified.  Either  BCD,  binary,  or  even  parity  tapes  may  be  dumped.  In  the 
case  of  a  mixed  mode  tape  (BCD  and  binary)  the  job  determines  the  mode  and  chooses 
the  format  for  printing. 

Currently,  the  maximum  record  size  which  can  be  dumped  is  2000  characters. 
This  buffer  size  for  the  tape  records  may  be  changed  prior  to  execution  using  the 
CHANGBUF  program. 

The  system  tape  unit  check  routines  TPRDUC,  PRTUC,  and  PRTUE  are  used. 
Task  Request  Format:  JOBNAME  UNITS  PARAMETERS 

Jobname:  T7DUMP 

Units:  PTRp  Txxx 

where  p  is  the  address  of  a  printer  and  xxx  is  the  address  of  a 
7-track  tape.  If  there  is  only  one  printer  attached  to  the  system, 
the  printer  unit  is  not  specified. 

Parameters: 


Density:  DEN 

2  (for  200  bpi) 

Default: 

DEN  8 

DEN 

5  (for  556  bpi) 

DEN 

8  (for  800  bpi) 

No.  of  Files:  FILE 

n(where  n  is  >0) 

Default: 

FILE  1 

Mode:  BCD 

Default: 

Mixed  mode 

BIN 

EVEN 
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If  the  tape  is  dumped  in  BCD,  each  6 -bit  character  on  the  tape  is  printed 
according  to  the  7094  BCD  character  code.  If  the  tape  is  dumped  in  binary 
(BIN),  or  even  parity  (EVEN),  each  6 -bit  character  is  printed  as  two  octal 
digits.  In  the  case  of  mixed  mode  tapes,  the  job  will  switch  modes  as 
required. 


Operating  Notes: 

1.  Before  each  record  is  printed,  the  following  line  is  printed: 


BCD 


FILE  NO.  xxxxxx  RECORD  NO.  yyyyyyBINARY  PRINTED  IN  0CTALzzzzzz  CHARACTERS 

EVEN  PARITY  PRINTED  IN  OCTAL 


where  xxxxxx  is  the  file  number,  yyyyyy  is  the  record  number,  and  zzzzzz  is 
the  number  of  characters  in  the  record.  The  format  of  record  is  indicated 
after  the  record  number. 


If  the  record  to  be  printed  exceeds  the  maximum  buffer  size,  the  printed 
record  is  truncated  and  the  above  message  is  followed  by: 

--TRUNCATION  OF  ORIGINAL  RECORD  SIZE-- 

2.  After  each  BCD  line,  a  line  is  printed  containing  asterisks  every  ten  characters 
to  aid  in  counting  the  number  of  characters  in  the  line. 


Examples: 

1.  T7DUMP  T180  DEN  8  FILE  2 

Two  files  from  the  800  bpi  mixed  mode  tape  on  unit  181  are  dumped. 

2.  T7DUMP  T180  BIN  DEN  5 

One  file  from  the  556  bpi  tape  on  unit  180  is  dumped  in  octal  forma  t. 

3.  T7DUMP  T181  DEN  2  BCD 

One  file  from  the  200  bpi  tape  on  unit  181  is  dumped  in  BCD  format. 

4.  T7DUMP  T181  DEN  8  EVEN 

One  file  from  the  even  parity  800  bpi  tape  on  unit  181  is  dumped  in  octal  format. 
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Console  Messages:  (t  implies  task  terminates) 


1.  t  ERROR  IN  PARAMETERS 

If  an  erroneous  parameter  is  typed,  the  task  will  be  terminated. 

2.  END  OF  FILE 
t  END  OF  JOBS 

indicates  that  the  task  has  completed 

3.  END  OF  TAPE 
t  END  OF  JOBS 

indicates  that  the  end  of  tape  mark  has  been  reached  on  the  dump  tape. 

The  task  is  terminated. 

4.  PARITY 

When  a  permanent  redundancy  is  encountered,  the  task  prints  the  following 
line  on  the  dump  listing: 

****parity  ERROR  IN  READING  NEXT  RECORD  AFTER  TEN  RETRIES**** 

If  the  tape  is  being  printed  in  mixed  mode,  the  redundant  record  is  printed 
in  both  octal  and  BCD  format. 

5.  FILE  MARK  WITH  PARITY  ERROR 

If  a  parity  error  occurs  in  reading  a  file  mark  on  the  tape,  the  program 
writes  the  message  on  the  console  and  on  the  dump  listing.  If  additional 
files  are  to  be  dumped,  the  program  increments  the  file  count  and  con¬ 
tinues,  otherwise  it  terminates. 
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T9DUMP 


Lincoln  Laboratory  Malti- Programming  Supervisor 
Job  Operating  Instructions 
Hex/EBCDIC  Tape  Dump  (Re-Entrant) 
Revised  25  November  1966 


General  Information: 

The  T9DUMP  job  dumps  a  9-track  tape  or  a  7 -track  tape  (recorded  with  density 
800,  odd  parity,  converter  on)  generated  on  the  360.  The  dump  can  be  in  hexadecimal  or 
hexadecimal  and  EBCDIC,  and  the  number  of  files  to  be  dumped  may  be  specified.  The 
system  tape  unit  check  routines  TPRDUC,  PRTUC,  and  PRTUE  are  used. 

Currently,  the  maximum  record  size  which  can  be  dumped  is  256  characters. 

The  buffer  size  for  the  tape  records  may  be  changed  prior  to  execution  using  the 
CHANGBUF  program. 

Task  Request  Format:  JOBNAME  UNITS  PARAMETERS 

Jobname:  T9DUMP 

Units:  PTRp  Txxx 

where  p  is  the  address  of  a  printer  and  xxx  is  the  address  of  a 
tape  unit.  If  only  one  printer  is  attached  to  the  system,  the 
printer  unit  is  not  specified. 

Parameters: 

No.  of  files:  FILE  (any  number  >0)  Default:  FILE  1 

Format:  EBCD  Default:  Hex  only 

If  the  parameter  EBCD  is  specified,  the  dump  will  be  printed  in 
both  hexadecimal  and  EBCDIC.  If  the  parameter  EBCD  is  not 
specified,  the  dump  will  be  printed  in  hexadecimal  only. 


Operating  Notes: 

1.  Before  each  record  is  printed,  the  following  line  is  printed: 

FILE  NO.  xxxxxx  RECORD  NO.  yyyyyy  HEXADECIMAL  DUMP  zzzzzz  CHARACTERS 

where  xxxxxx  is  the  file  number,  yyyyyy  is  the  record  number,  and 
zzzzzz  is  the  number  of  characters  in  the  record. 

If  the  record  to  be  printed  exceeds  the  maximum  buffer  size,  the  printed 
record  is  truncated  and  the  above  message  is  followed  by: 

--TRUNCATION  OF  ORIGINAL  RECORD  SIZE-- 
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Examples: 

1.  T9DUMP  T280  FILE  5  EBCD 

Five  files  from  the  tape  mounted  on  unit  280  are  dumped  in  both 
hexadecimal  and  EBCDIC. 

2.  T9DUMP  T280  FILE  2 

Two  files  are  dumped  from  tape  280  in  hexadecimal  only. 

3.  T9DUMP  T280 

One  file  is  dumped  from  tape  280  in  hexadecimal  only. 

Console  Messages:  (t  indicates  task  terminates) 

1.  t  ERROR  IN  PARAMETER 

If  an  erroneous  parameter  is  typed,  the  task  will  be  terminated. 

2.  END  OF  FILE 
t  END  OF  JOBS 

Indicates  that  the  task  has  completed. 

3.  END  OF  TAPE 
t  END  OF  JOBS 

Indicates  that  the  end  of  tape  mark  has  been  reached  on  the  dump  tape. 
The  task  is  terminated. 

4.  PARITY 

When  a  permanent  redundancy  is  encountered,  the  task  prints  the 
following  line  on  the  dump  listing: 

PARITY  ERROR  IN  READING  NEXT  RECORD  AFTER  10  RETRIES 

5.  FILE  MARK  WITH  PARITY  ERROR 

If  a  parity  error  occurs  in  reading  a  file  mark  on  the  tape,  the  program 
writes  the  message  on  the  console  and  on  the  dump  listing.  If  additional 
files  are  to  be  dumped,  the  program  increments  the  file  count  and  con¬ 
tinues,  otherwise  it  terminates. 
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LABEL 


Lincoln  Laboratory  Multi -Programming  Supervisor 
Job  Operating  Instructions 
Tape  Label  Program 
Revised  5  October  1966 


General  Information: 

LABEL  performs  the  task  of  writing  a  label  on  a  7-track  tape  (even  parity, 
translator  on,  density  200,  556,  or  800)  or  on  a  9-track  tape  (odd  parity,  density  800) 
on  the  360.  The  label  record  is  a  single  record  followed  by  a  tape  mark  (EOF).  The 
system  tape  unit  check  routine  TPWRUC  is  used. 

The  job  program  obtains  information  from  the  operator's  console  to  form  the 
volume  label  sequence  number,  a  6-character  tape  label  consisting  of  the  3-character 
tape  bin  number  followed  by  the  last  three  digits  of  the  tape  reel  number,  and  the  tape 
owner's  identification. 

Task  Request  Format:  JOBNAME  UNITS  PARAMETERS 

Jobname:  LABEL 

Units:  Txxx 

Where  xxx  is  the  address  of  either  a  7-track  or  9-track  tape. 

Parameters: 

Tape  Reel  Number:  RELxxx 

where  xxx  is  the  last  three  digits  of  the  tape  reel  number. 

Tape  Bin  Number:  BINxxx 

where  xxx  is  the  tape  bin  number. 

Density:  DEN2  (200  bpi)  Default:  DEN8 

DEN5  (556  bpi) 

DEN8  (800  bpi) 

Volume  Label  Sequence  Number: 

VOLx  Default:  VOL1 

where  x  is  a  volume  label  sequence  number  from  1  to  8. 

Tape  Owner's  Identification: 

ID  Default:  LINCOLNLAB 

If  the  ID  parameter  is  typed,  the  program  will  type  a  message  on 
the  console  typewriter  requesting  the  operator  to  type  a  tape  owner's 
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Examples: 

4.  LABEL 


identification  of  up  to  ten  characters.  The  system  will  then  type  the 
task  number  and  the  job  name  followed  by  three  dots  to  indicate  that 
it  is  the  operator's  turn  to  type.  A  line  in  which  the  ID  LINCOLNLAB 
was  entered  would  appear  as  follows: 

00043  LABEL. .. lincolnlab 


T280  BINA4B  REL649 


A  label  of  A1B649  is  written  on  tape  280  with  density  800  bpi. 

The  volume  label  sequence  number  VOL4  and  identification 
LINCOLNLAB  is  used. 

2.  LABEL  T280  BINA3J  REL345  DEN5 

A  label  of  A3J345  is  written  on  tape  280  with  density  556  bpi. 

The  volume  label  sequence  number  VOL4  and  identification 
LINCOLNLAB  is  used. 

3.  LABEL  T280  BINB2K  REL876  VOL2  ID 

A  label  of  B2K876  and  a  volume  label  sequence  number  of  VOL2 

is  written  on  tape  280  with  density  of  800  bpi.  The  tape  owner's 

identification  is  obtained  from  the  operator. 


Console  Messages:  (t  indicates  task  terminates) 

4.  t  ERROR  IN  PARAMETER 

If  an  erroneous  parameter  is  typed,  the  task  will  be  terminated. 

2.  t  BIN  NUMBER  NOT  TYPED  RESTART  JOB 

Indicates  that  the  parameter  BINxxx  has  not  been  typed.  The  task  terminates. 

3.  t  REEL  NUMBER  NOT  TYPED  RESTART  JOB 

Indicates  that  the  parameter  RELxxx  has  not  been  typed.  The  task  terminates. 

4.  t  END  OF  TAPE  REEL 

Indicates  that  the  end  of  tape  mark  has  been  reached  on  the  tape.  The  task 
terminates. 

5.  t  PERMANENT  WRITE  ERROR  TAPE  PARITY 

Indicates  that  a  permanent  write  redundancy  has  been  encountered  in  attempting 
to  label  the  tape.  The  task  terminates. 

6.  OPERATOR  TYPE  ID 

Indicates  that  the  operator  must  now  supply  a  10  character  tape  owner's  ID. 
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CALCOMP 


Lincoln  Laboratory  Multi- Programming  Supervisor 
Job  Operating  Instructions 
Calcomp  Plot  Job 
27  May  1966 


General  Information: 

CALCOMP  performs  the  task  of  plotting  standard  Calcomp  output  tapes  pro¬ 
duced  on  the  7094  or  360.  Each  picture  or  reference  point  on  the  tape  is  separated 
by  a  header  record.  Thus,  the  operator  may  skip  to  any  specific  picture  within  a 
file.  This  job  uses  the  tape  unit  check  routine,  TPRDUC. 

Task  Request  Format:  JOBNAME  UNITS  PARAMETERS 
Jobname:  CALCOMP 

Units:  Txxx  PLTn 

Where  xxx  is  address  of  7-track  tape  to  be  plotted  and  n  is  the 
number  of  the  plotter  to  be  used. 

Parameters: 

File:  Fn 

This  parameter,  if  present,  will  skip  to  the  file  on  the  tape  specified 
by  the  integer  n. 

Picture:  Pn 

This  parameter,  if  present,  will  skip  to  picture  or  reference  point 
specified  by  the  integer  n.  The  tape  will  first  move  to  the  proper 
file  number. 

Example: 

1.  CALCOMP  T281  PLT1 

To  plot  a  tape  mounted  on  tape  unit  281  on  plotter  1. 

2.  CALCOMP  T282  PLT2  P5 

To  plot  a  tape  mounted  on  tape  unit  282  on  plotter  2 
beginning  at  the  5th  picture. 

3.  CALCOMP  T180  PLT2  F3  P10 

To  plot  a  tape  mounted  on  tape  unit  180  on  plotter  2 
beginning  at  the  10th  picture  of  the  3rd  file. 
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Console  Messages',  (f  indicates  task  terminates) 


1.  t  PICTURE  NOT  FOUND 

A  file  mark  was  reached  before  the  picture  specified  was 
found. 

2.  t  INVALID  TAPE  HAS  BEEN  MOUNTED.  RESTART  JOB. 

An  invalid  Calcomp  plot  tape  has  been  mounted.  Check 
the  tape. 

3.  FILE  NO.  xxx,  PICTURE  NO.  ppp 

This  message  is  printed  when  a  new  picture  is  encountered. 

The  operator  may  use  this  as  a  guide  to  restarting  the  job  if 
one  of  the  pictures  is  ruined  by  mechanical  failure  of  the  plotter. 
The  operator  should  find  the  file  no.  and  the  picture  no.  of  the 
last  good  plot,  terminate  the  current  task,  rewind  the  tape,  and 
then  restart  the  job  using  the  proper  picture  no. 

4.  t  END  OF  JOB 

Occurs  when  two  successive  EOF's  are  read. 

5.  PERM  READ  REDUNDANCY 

When  this  message  appears,  an  error  mark  is  written  on  the 
plotter  to  indicate  to  the  programmer  that  his  plot  is  in  error. 
The  error  mark  is:  *y*. 

6.  BAD  TAPE,  SKIPPING  TO  NEXT  PICTURE.  REPOSITION  PEN. 

This  message  appears  when  ten  bad  records  were  encountered 
within  one  picture.  The  operator  should  move  the  pen,  and  hit 
start  and  stop  on  the  plotter. 

7.  t  EXCESSIVE  READ  REDUNDANCIES,  JOB  TERM. 

When  50  bad  records  were  encountered,  the  task  will  terminate. 

8.  t  ERROR  IN  PARAMETERS,  RECALL. 

The  operator  made  a  typing  error,  retry. 

9.  CALCOMP  NOT  READY 

The  plotter  associated  with  this  task  is  not  in  ready  status. 
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10.  END  OF  FILE.  REPOSITION  PEN. 

The  operator  should  move  the  pen  and  paper  then  hit  start 
and  stop  on  the  plotter  interface.  This  will  insure  that  jobs 
are  separated  properly. 

11.  t  FAILURE  UX. 

Inform  the  system  programmer. 

12.  t  UNIT  CHECK  SENSE  X. 

Inform  the  system  programmer. 
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CHANGBUF 


Lincoln  Laboratory  Multi -Programming  Supervisor 
Job  Operating  Instructions 
Change  Buffer  Size  Program 
6  June  1966 


General  Information: 

CHANGBUF  performs  the  task  of  changing  buffer  sizes  specified  in  a  job  header 
of  a  job  program.  The  job  program  name,  buffer  numbers,  and  new  buffer  sizes  are 
specified  as  parameters  from  the  console  typewriter.  Several  buffers  may  be  changed 
at  one  initiation  of  the  CHANGBUF  program.  CHANGBUF  uses  the  LLMPS  external  sub¬ 
routine  FJBLST,  to  locate  the  address  of  the  job  program  from  the  job  list  entry. 


Task  Request  Format: 

Jobname: 

Units: 

Parameters: 

Jobname: 


JOBNAME  UNITS  PARAMETERS 

CHANGBUF 

No  units  required 


jnjnjnjn 


The  job  program  name  must  be  specified  before  all  other  parameters 
and  may  have  eight  or  less  characters.  If  there  are  more  than  four 
characters  to  a  job  name,  the  operator  types  the  first  four  characters 
followed  by  a  space,  then  the  remaining  characters. 


Buffer  Number:  BFNO  n 


Default:  BFNO  1 


Where  n  is  the  number  of  the  buffer  in  the  job  header  of  the  job  program. 
If  no  buffer  number  is  specified,  the  program  assumes  buffer  number  1. 

Buffer  Size:  SIZE  nnnnn  Default:  SIZE  maxbuf 


Where  nnnnn  is  the  number  of  bytes  of  the  new  buffer  size.  If  no  buffer 
is  typed,  CHANGBUF  assumes  the  maximum  buffer  size  allowed  by  the 
supervisor. 


Operating  Notes: 

1.  The  buffer  numbers  and  buffer  sizes  for  a  job  are  specified  as  keyword  and 
value  pairs.  The  keyword/value  pairs  of  BFNO  and  SIZE  are  assumed  to  be 
associated  but  may  be  specified  in  any  order.  If  associations  are  not  made 
explicitly  by  consecutively  specifying  both  a  BFNO  and  SIZE,  the  default 
option  is  assumed  for  the  keyword/value  pair  not  specified  directly. 
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2. 


CHANGBUF  inserts  new  buffer  sizes  into  a  job  header  of  a  job  program  in  core. 
CHANGBUF  does  not  reset  original  buffer  sizes  after  execution  of  the  job  program; 
therefore,  the  job  programs  should  set  the  buffer  sizes  to  a  minimum  size  after 
noting  the  size  used  for  job  initiation. 


Examples: 

CHANGBUF  T7DU  MP  SIZE  10000  BFNO  1 

The  size  of  the  first  buffer  in  the  job  program  T7DUMP  is  changed  to 
10,  000  bytes. 

CHANGBUF  T7DU  MP 

The  size  of  the  first  buffer  of  the  job  program  T7DUMP  is  set  to  the 
size  of  the  largest  buffer  in  the  system. 

CHANGBUF  PRIN  T  SIZE  2000  SIZE  5000  BFNO  2 

The  size  of  the  first  buffer  is  changed  to  2000  bytes,  and  the  size 
of  the  second  buffer  is  changed  to  5000  bytes  in  the  job  program 
PRINT. 

Console  Messages:  (t  indicates  task  terminates) 

1.  t  ERROR  IN  PARAMETER 

If  an  erroneous  parameter  is  typed,  the  task  terminates. 

2.  t  BUFFER  SIZE  EXCEEDS  MAXIMUM  BUFFER 

The  buffer  size  specified  exceeds  the  maximum  buffer  allotted  by  the 
supervisor.  The  task  terminates. 

3.  f  ZERO  BFNO  NUMBER  TYPED  OR  NUMBER  EXCEEDS  SIX 

The  buffer  number  typed  is  zero  or  exceeds  the  maximum  number  of 
buffers  allowed  by  LLMPS.  The  task  terminates. 

4.  t  JOB  NOT  FOUND  IN  JOB  LIST 

The  job  program  is  not  in  the  current  system.  The  task  terminates. 

5.  t  BUFFER  TO  BE  CHANGED  EXCEEDS  TOTAL  NUMBER  OF  BUFFERS 

IN  JOB  HEADER 

The  buffer  number  typed  exceeds  the  total  number  of  buffers  specified 
in  the  job  header  of  the  indicated  job  program.  The  task  terminates. 
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DISKDUMP 


Lincoln  Laboratory  Multi -Programming  Supervisor 
Job  Operating  Instructions 
Disk  Dump  Job 
17  June  1966 


General  Information: 

The  DISKDUMP  job  displays  the  contents  of  a  2311  disk  on  a  printer.  Records  on 
the  disk  may  be  dumped  in  both  hexadecimal  and  EBCD  or,  alternatively,  the  standard 
Volume  Table  of  Contents  (VTOC)  may  be  displayed. 

Each  record  which  is  displayed  is  preceded  by  an  identifying  label  which  gives  the 
address  of  the  record  (CYL  -  TRK  -  REC)  and  also  the  key  length  and  the  data  length. 

The  key  length  and  data  length  are  obtained  from  the  count  area  which  is  the  first  11  bytes 
of  a  record.  The  key  length  is  specified  in  the  7th  byte  of  the  count  area  and  the  data 
length  is  specified  in  the  8th  and  9th  bytes  of  the  count  area.  The  count  area  is  followed 
immediately  by  the  key  and  data  areas  which  are  printed  out  in  both  EBCDIC  and  hexadecimal. 

To  display  the  Volume  Table  of  Contents,  the  address  of  the  VTOC  is  obtained  from 
the  volume  label  which  is  assumed  to  be  on  cylinder  0,  track  0,  record  3  of  the  disk.  The 
volume  label  has  "VOL1”  in  bytes  1  thru  4  of  the  label  record  and  the  volume  ID  in  bytes 
5  thru  10.  The  address  of  the  VTOC  is  obtained  from  bytes  12  thru  16  of  the  label  record 
and  is  in  the  form  CCTTR  where  CC  is  the  cylinder  number  (0-201),  TT  is  the  track 
number  (0-9),  and  R  is  the  record  number  (1-20). 

The  information  displayed  from  the  VTOC  is  obtained  from  Format  1  records 
(indicated  by  an  FI  in  the  45th  byte  of  the  record)  and  the  extent  of  the  VTOC  is  obtained 
from  the  Format  4  record  (indicated  by  an  F4  in  the  45th  byte  of  the  record).  This  job 
program  assumes  that  the  Format  4  record  is  the  first  record  of  the  VTOC.  The  address 
of  the  last  Format  1  record  is  obtained  from  bytes  46  thru  50  of  the  Format  4  record  in 
the  form  CCTTR.  Format  1  records  are  read  until  the  last  one,  indicated  by  the  address 
specified  in  the  Format  4  record,  is  reached.  The  information  displayed  from  Format  1 
records  consists  of  a  data  set  name  (bytes  1-44),  the  starting  address  of  the  data  set 
(bytes  108-111),  and  the  ending  address  of  the  data  set  (bytes  112-115).  The  addresses 
are  specified  in  the  form  CCTT. 

For  more  information  on  the  2311  disk  refer  to  IBM  System/360  Component 
Descriptions  -  Form  A26-5988  and  Introduction  to  Control  Program  Logic  -  Form 
Z28-6605. 
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Task  Request  Format: 


JOBNAME  UNITS  PARAMETERS 


Jobname: 


DISKDUMP 


Units: 


PTRr  Dxxx 


Where  r  is  on  the  address  of  a  1403  printer  and  xxx  is 
the  address  of  the  2311  disk  to  be  dumped.  If  there  is 
only  one  printer  attached  to  the  system,  the  printer  ED 
does  not  have  to  be  specified. 


Parameters: 


Beginning  Address: 


cyl  trk  rec 


Default:  VTOC 


The  address  of  the  first  record  to  be  dumped  is  specified 
by  3  decimal  parameter  indicating  the  cylinder,  track, 
and  record  numbers.  Either  all  of  these  first  3  parameters 
must  be  specified  or  none  of  them.  If  no  parameters  are 
specified,  the  Volume  Table  of  Contents  is  displayed. 


Ending  Address: 


Default:  entire  disk 


maxcyl  maxtrk 


Where  MAXCYL  and  MAXTRK  indicate  the  cylinder  and  track  number 
at  which  the  program  is  to  stop  dumping.  The  task  will  terminate 
after  printing  the  last  record  on  the  track  preceding  the  one  identified 
by  MAXTRK.  If  specified,  these  two  parameters  must  follow  the  three 
parameters  indicating  the  beginning  address.  If  they  are  not  specified, 
the  disk  will  be  dumped  beginning  at  the  address  specified  by  the  first 
three  parameters  through  to  the  end  of  the  disk. 


Examples: 


1.  DISKDUMP  D390 

The  VTOC  on  disk  390  will  be  printed  giving  data  set  names,  beginning 
addresses,  and  ending  addresses. 

2.  DISKDUMP  D390  2  3  4 

The  entire  disk  390  will  be  dumped  beginning  with  cylinder  2,  track  3, 
and  record  4. 

3.  DISKDUMP  D390  2  3  4  2  4 

The  records  on  cylinder  2,  track  3  of  disk  390  will  be  dumped  beginning 
with  record  4  (the  5th  record). 
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Console  Messages:  (f  indicates  job  terminates) 


1.  DEVICE  NOT  READY.  READY  DISK  Dxxx 
When  the  disk  is  made  ready  the  job  will  continue. 

2.  t  END  OF  TABLE  OF  CONTENTS 

After  the  VTOC  has  been  displayed,  this  message  will  be  printed 
on  the  console  typewriter  and  the  job  terminated. 

3.  t  NO  RECORD  FOUND.  JOB  TERMINATED. 

An  invalid  record  address  has  been  specified. 

4.  t  THIS  IS  A  DEFECTIVE  TRACK.  UNABLE  TO  READ  THIS  TRACK. 
An  unrecoverable  read  error  has  occurred. 

5.  t  INVALID  SEEK  ADDRESS.  JOB  TERMINATED. 

A  possible  program  error  has  occurred. 

The  following  console  messages  may  indicate  hardware  failures. 

6.  t  BUS  OUT  PARITY  CHECK.  JOB  TERMINATED. 

7.  t  COMMAND  REJECT.  JOB  TERMINATED. 

8.  t  DATA  CHECK.  JOB  TERMINATED. 

9.  t  MACHINE  ERROR  ON  Dxxx. 
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HNPNLOAD- 

UCSLOAD 


Lincoln  Laboratory  Multi -Programming  Supervisor 
Job  Operating  Instructions 
HNPNLOAD  and  UCSLOAD  Program 
5  October  1966 


General  Information: 

The  HNPNLOAD  and  UCSLOAD  program  loads  an  arrangement  of  240  codes 
selected  from  the  Extended  Binary  Coded  Decimal  Interchange  Code  into  the  read/write 
storage  units  of  the  2821  control  unit  for  a  1403  printer.  The  program  requires  a  1403 
printer  and  2821  control  unit  with  the  universal  character  set  feature.  Any  user-designed 
chain  or  train  arrangement  may  be  loaded  in  addition  to  the  following  IBM  arrangements: 
PC  AN,  PCHN,  AN,  HN,  PN,  QN,  RN,  SN,  TN,  XN,  and  YN. 

The  HNPNLOAD  program  can  be  used  to  load  a  1403  printer  control  unit  buffer 
with  the  codes  for  either  an  HP  or  PN  train.  The  codes  are  stored  within  the  job 
program  and  are  transmitted  to  the  control  unit. 

The  UCSLOAD  program  requires  that  a  NAME  control  card  and  four  IMAGE 
control  cards  be  provided  as  described  below.  The  NAME  card  identifies  the  character 
set  of  the  printer  chain  (train)  and  must  precede  the  IMAGE  cards  which  contain  the 
desired  240  character  to  be  loaded  into  the  control  unit  buffer. 

If  a  user-designed  arrangement  is  to  be  loaded,  the  user  must  adhere  to  the 
restriction  that  graphics  may  be  arranged  in  any  sequence  provided  no  character 
repeats  within  16  positions.  Further  information  relating  to  the  designing  of  an 
arrangement  may  be  obtained  from  IBM  manuals  C24-3396,  Universal  Character  Set 
Utility  Program,  and  A24-3312-2,  IBM  2821  Control  Unit. 

The  system  tape  unit  check  routines  CDRDUC,  CDSTUC,  PRTUE,  and  PRTUC 
are  used.  Both  the  USCLOAD  program  and  the  HNPNLOAD  program  are  re-entrant. 

Task  Request  Formats: 

Jobname:  HNPNLOAD 

Units:  PTRp 

Where  p  is  the  address  of  a  1403  printer  with  the 
UCS  feature. 


III.  B.  14-1 


Jobname: 


UCSLOAD 


Units :  RDRr  PTRp 

Where  r  is  the  address  of  a  2540  card  reader  and  p 
is  the  address  of  a  printer.  If  there  is  only  one  reader 
or  printer  attached  to  the  system,  the  reader  or  printer 
unit  is  not  specified. 

Parameters: 

1.  Folding:  FOLD  Default:  No  Folding 

Folding  of  the  entire  third  quadrant  of  the  EBCDIC  code 
into  the  fourth  quadrant  causes  incoming  upper  and  lower 
case  code  data  to  be  printed  out  using  only  an  upper  case 
arrangement.  If  the  power  is  turned  off  in  the  2821  control 
unit,  the  folding  feature  is  lost,  but  the  contents  in  the  storage 
unit  are  retained. 

2.  Train:  HN  Default:  UN 

PN 

This  parameter  specifies  the  train  IMAGE  to  be  used. 

The  codes  for  these  arrangements  are  stored  within  the 
job  program.  This  parameter  should  only  be  used  with 
the  HNPNLOAD  program;  it  causes  a  parameter  error  if 
used  with  the  UCSLOAD  program. 


UCS  Program  Control  Cards  (For  UCSLOAD  program  only): 

NAME  Card: 


Function:  Identifies  character  set  used 

Usage:  One  per  character  set 

Format:  Fixed,  as  follows: 


Cols. 

Punch 

Purpose 

1  -  2 

// 

Identifies  control  card 

3 

blank 

Separator 

4  -  7 

NAME 

Operation 

8-10 

blank 

Not  used 

11-80 

Application  Name 

Identifies  character  set 
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IMAGE  Cards: 


Function:  Provides  characters  to  be  loaded 

Usage:  Four  cards  per  character  set 

Format:  Fixed,  as  follows: 

Cols. 

Punch 

Purpose 

1  -  2 

// 

Identifies  control  card 

3 

blank 

Separator 

4  -  5 

Cl 

Operation 

6 

blank 

Separator 

7  -  10 

character  coded 
identification 

Character  set  code 
identification 

11 

blank 

Separator 

12 

S 

1  for  card  1 

Sequence  number  follows 

13 

2  for  card  2 

3  for  card  3 
_4  for  card  4 

Sequence  number  of  individual 
Cl  cards  in  ascending  sequence 

14 

blank 

Not  used 

15 

blank  for  Cl  cards 

1,  2,  and  3 

Card  4  contains  the  number  of 
IMAGE  lines  to  be  printed 
(See  Table  HI.  B.  14-2) 

16-20 

blank 

Not  used 

21-80 

characters  to  be 
loaded  into  the  UCS 
buffer 

Each  Cl  card  contains  60 
characters 

Operating  Notes: 

When  loading  is  complete,  the  program  prints  an  identifying  message,  if  an  IBM 
arrangement  is  used,  or  the  character  sequence  of  the  printer  chain  (train),  if  a  user- 
designated  arrangement  is  used,  followed  by  the  chain  (train)  IMAGE,  and  then  the 
contents  of  the  NAME  card  -  provided  that  the  NAME  card  can  be  printed  with  the  set 
of  characters  on  the  printer  chain  (train). 

If  an  IBM  arrangement  is  used  and  the  specified  chain  (train)  was  mounted,  an 
identifying  message  as  indicated  in  Table  III.  B.  14-1  will  be  printed.  The  operator 
should  verify  that  the  message  printed  is  correct. 

If  a  user-designated  arrangement  is  used,  the  operator  should  verify  that  the 
character  sequence  printed  corresponds  to  the  desired  chain  (train)  arrangement. 
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The  number  of  printed  lines  in  the  chain  (train)  image  is  specified  in  column  15 
of  the  fourth  IMAGE  control  card  and  is  indicated  in  Table  II  for  the  IBM  arrangements. 
The  number  of  lines  corresponds  to  the  repeat  factor  of  the  chain  (train). 

In  Tables  III.  B.  14-1  and  III.  B.  14-2,  the  XN  arrangement  is  for  a  chain 
cartridge  only,  and  the  YN  arrangement  is  for  a  train  cartridge  only. 

An  example  of  the  complete  printout  for  the  IBM  HN  arrangement  is  shown  below: 

HN  ARRANGEMENT  TYPE  IF  EQUAL  SIGN  = 


123456789C='/STUVHXYZ*» ( JKLMNOPQR— $*ABCDE FGH I +• ) 

V 

1 234567890=  '/STUVWXYZ*,  (  JKLMNCPQR-$*ABCDEFGHH-.  ) 
1  234567  890  =  */ STL VV»X  YZ *,  ( JKLMNCPQR-$*ABCDEFGHI  ) 
1234567890= • / STUVHXYZ * r < JKLMNOPQR-$*ABCDEFGHI+. I 


1234567850= ,/STUVWXYZ$f( JKLMNOPQR— $*A8CDEFGH I ♦. ) 


LL  HN  PRINT  CHAIN 


Cartridge 
PC  AN 
PCHN 
AN 
HN 
PN 
QN 
RN 
SN 
TN 
XN 
YN 


Identifying  Message 

PC  AN  ARRANGEMENT  TYPE  IF  POUND  SIGN  § 
PCHN  ARRANGEMENT  TYPE  IF  EQUAL  SIGN  = 
AN  ARRANGEMENT  TYPE  IF  POUND  SIGN  # 

HN  ARRANGEMENT  TYPE  IF  EQUAL  SIGN  = 

PN  ARRANGEMENT  TYPE  IF  POUND  SIGN  # 

QN  ARRANGEMENT  TYPE  IF  POUND  SIGN  # 
RN  ARRANGEMENT  TYPE  IF  POUND  SIGN  # 

SN  ARRANGEMENT  TYPE  IF  COMMA  SIGN  , 
TN  ARRANGEMENT  TYPE  IF  POUND  SIGN  # 
XN  ARRANGEMENT  TYPE  IF  COMMA  SIGN  , 
YN  ARRANGEMENT  TYPE  IF  POUND  SIGN  # 


Table  III.  B.  14-1 
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System /360  Cartridges 
(Punched  in  Cl  cards  i,  2,  3  and  4) 

Cols.  7  8  9  10 
P  CAN 
P  CHN 
AN 
HN 
P  N 
QN 
RN 
S  N 
TN 
XN 
YN 


Number  of  printed  lines  in  the 
chain  (train)  Image 

(Punched  in  Cl  card  4  only) 

Col.  15 

4 

4 

5 
5 

4 

5 

5 

A  (3  lines  will  be  printed) 
2 

6 

B  (6  lines  will  be  printed) 


Table  III.  B.  14-2 


Examples: 

1.  HNPNLOAD  PTRF 

The  IBM  HN  cartridge  train  arrangement  is  loaded  into  the  2821  control  unit 
buffer  for  printer  F 

2.  HNPNLOAD  PTRF  PN  FOLD 

The  IBM  PN  cartridge  train  arrangement  is  loaded  into  the  2821  control  unit 
buffer  for  printer  F  with  the  folding  option. 

3.  UCSLOAD  PTRE 

The  240-character  set  is  loaded  into  the  2821  control  unit  for  printer  E. 

4.  UCSLOAD  RDRr  PTRp  FOLD 

The  240-character  set  is  loaded  into  the  2821  control  unit  with  folding 
capability. 
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Console  Messages:  (t  indicates  task  terminates) 


1.  t  ERROR  IN  PARAMETER 

If  an  erroneous  parameter  is  typed,  the  task  terminates. 

2.  t  IMPROPER  CONTROL  CARD 

If  a  control  card  doesn't  have  a  slash  in  columns  1  and  2  and  a  blank  in 
column  3,  the  task  terminates. 

3.  t  UNIDENTIFIABLE  CARD  READ 

Indicates  that  the  program  was  unable  to  identify  the  type  of  control 
card  read.  The  task  terminates. 

4.  t  CARD  SEQUENCE  ERROR 

Indicates  that  the  NAME  control  card  was  not  the  first  card  read  or 
that  the  IMAGE  control  cards  are  not  in  ascending  order.  The 
task  terminates. 

5.  t  Cl  CARDS  NOT  FROM  SAME  DECK 

The  chain  image  control  cards  do  not  have  the  same  4 -character 
identification  code.  The  task  terminates. 

6.  t  CARD  PUNCHED  INCORRECTLY 

Columns  14-20  of  the  chain  image  cards  must  be  blank.  If  not,  the 
above  message  is  given  and  the  task  is  terminated. 

7.  t  CHARACTER  REPEATS  WITHIN  16  POSITIONS 

Graphics  may  be  arranged  in  any  sequence  on  the  print  chain/train 
provided  that  no  character  repeats  within  16  positions.  If  a  character 
repeats  within  16  positions,  the  task  terminates. 

8.  CHECK  VALIDITY  OF  CHAIN/TRAIN 

When  loading  is  complete  the  above  message  is  typed  to  the  operator. 


III.  B.  14-6 


CONVERT. 

REPRO 


Lincoln  Laboratory  Multi- Programming  Supervisor 
Job  Operating  Instructions 
CONVERT/REPRO  Job 
Revised  3  November  1966 


General  Information: 


CONVERT  accepts  cards  punched  with  the  codes  produced  by  an  IBM  Model  026 
card  punch  (the  pre-360  BCD  code)  and  produces  new  cards,  on  a  one-for-one  basis, 
that  are  punched  in  accordance  with  the  EBCDIC  code  used  by  S/360.  This  job  is  useful 
in  converting  cards  punched  on  the  Model  026  Card  Ptinch  to  cards  that  would  have  been 
punched  on  the  (newer)  Model  029  Card  Ranch  if  keys  with  the  same  graphics  had  been 
used. 


REPRO  produces  new  cards  on  a  one-for-one  basis.  The  reproduced  cards  are 
identical  to  the  input  cards  regardless  of  the  codes  used.  Input  codes  are  not  checked 
for  validity;  therefore,  the  job  may  be  used  to  duplicate  any  deck. 

Both  programs  use  the  CDRDUC,  CDSTUC  and  CDPNUC  routines  for  card  unit 
checks.  Both  programs  are  re-entrant  and  may  be  used  simultaneously  without  conflict 
provided  the  necessary  readers  and  punches  are  available. 

Task  Request  Summary: 

CONVERT  RDRr  PCHp 
REPRO  RDRr  PCHp 

Sense  Switch  Bits  Used:  2  (EOF) 


Task  Request  Format:  JOBNAME  UNITS  PARAMETERS 

Jobname:  CONVERT  or  REPRO 

Units:  RDRr  PCHp 

where  r  is  the  address  of  a  2540  card  reader  and  p  is 
the  address  of  a  2540  card  punch.  If  there  is  only  one 
card  reader  or  one  card  punch  attached  to  the  system, 
the  reader  or  punch  unit  need  not  be  specified. 


Parameters:  None 
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Examples: 

CONVERT 

Any  cards  placed  into  the  reader  hopper  will  he  reproduced  with  converted 
codes  by  the  punch. 

REPRO 

Any  cards  placed  into  the  reader  hopper  will  he  reproduced  without 
change. 

Sense  Switch  Usage: 

Bit  2:  If  bit  2  of  the  sense  switch  is  set,  the  task  will  terminate  after  the  last 
card  has  been  read  and  reproduced,  provided  that  the  End-of-File  light  is  set.  If  this 
switch  bit  is  not  set,  or  the  End-of-File  light  is  not  set,  the  task  will  not  terminate. 


Console  Messages; 

1.  I/O  ERROR 

A  unit  exception  occurred  on  the  card  punch.  A  job  dump 
occurs  and  the  task  is  terminated. 

Operating  Instructions; 

The  task  feeds  one  blank  card  from  the  punch  before  punching,  and  feeds  one 
final  blank  card  from  the  punch  after  having  reproduced  the  last  card  read  with  the 
end-of-file  light  on.  It  is  therefore  never  necessary  to  perform  a  non-process  run-out 
of  the  punch.  After  having  converted  (or  reproduced)  one  deck,  another  deck  will  be 
processed  whenever  the  reader  is  made  ready  again.  The  task  can  only  be  terminated 
by  setting  switch  2  with  the  End-of-File  light  set,  or  by  the  TERM  task. 

Conversion  Routine'.  (Used  by  CONVERT  only) 

Any  card  with  an  acceptable  EBCDIC  punched  card  code  will  be  read  and  con¬ 
verted.  251  of  the  possible  codes  will  be  reproduced  unchanged.  The  five  codes  in 
the  table  below  are  converted  as  shown.  Cards  requiring  the  column  binary  feature 
are  not  acceptable  to  the  CONVERT  program. 
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Model  026  Code 

converts  to 

Model  029  Code 

BCD 

Punched 

Hex 

EBCDIC 

Punched 

Hex 

Graphic 

Code 

Code 

Graphic 

Code 

Code 

) 

12-8-4 

4C 

) 

11-8-5 

5D 

+ 

12 

50 

+ 

12-8-6 

4E 

( 

0-8-4 

6C 

( 

12-8-5 

4D 

= 

8-3 

7B 

= 

8-6 

7E 

1 

8-4 

7C 

l 

8-5 

7D 

Table  III.  B.  15-1.  026  to  029  Conversion  Table. 

Program  Logic: 

The  following  flow  charts  describe  the  logical  processing  of  the  job. 
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Fig.  UI.  B.  15-1.  CONVERT/REPRO  Flow  Diagram. 
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(From  Previous  Page) 


Reader 
UE  Return 


PUNCHTAP 


Lincoln  Laboratory  Multi -Programming  Supervisor 
Job  Operating  Instructions 
Paper  Tape  Punch  Job 
21  November  1966 


General  Information: 

PUNCHTAP  reads  card  images  in  EBCDIC  code  from  a  9-track  tape  (or  from  a 
7-track  tape  with  density  800,  odd  parity,  converter  on)  and  punches  them  out  on  paper 
tape  in  FIELDATA  code.  The  paper  tape  produced  can  be  used  as  input  to  the  Univac 
1219. 


The  EBCDIC  card  images  are  handled  by  PUNCHTAP  as  follows.  Card  columns 
11,  21  and  39  are  considered  delimeters  of  fields  1,  2  and  3  respectively.  If  a  deli¬ 
meter  is  blank  it  is  replaced  by  a  tab  and  the  trailing  blanks  of  the  preceding  field  are 
truncated.  If  a  delimeter  is  not  blank,  the  preceding  field  is  left  as  is.  Trailing  blanks 
are  also  suppressed  in  the  "comment"  field  (columns  40-80).  The  hex  equivalent  for 
carriage  return-line  feed  (hex  FA,  FB)  are  then  inserted  at  the  end  of  the  compressed 
card  image.  Each  character  in  that  image  is  converted  to  FIELDATA  code  as  shown 
in  the  translation  table  and  punched  out  on  paper  tape.  Note  that  the  program  converts 
the  EBCDIC  character  @  (8-4  punch)  to  the  FIELDATA  stop  code  and  punches  a  stop 
code  followed  by  3  inches  of  blank  tape. 

The  program  uses  the  TPRDUC  routine  for  tape  read  unit  checks. 

Task  Request  Summary: 

PUNCHTAP  Txxx  PLTn 


Task  Request  Format: 

Jobname:  PUNCHTAP 

Units:  Txxx  PLTn 


where  xxx  is  the  address  of  a  9-track  tape  (or  7-track 
tape  recorded  with  density  800,  odd  parity,  converter 
on)  containing  the  EBCDIC  card  images  and  PLTn  is  the 
address  of  the  paper  tape  punch.  Currently,  PLT2  must 
be  used  for  the  paper  tape  punch. 

Parameters:  None 
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Operating  Note: 


The  power  switch  on  the  paper  tape  interface  box  must  be  on  and  the  rotary 
switch  on  the  Calcomp  interface  box  must  be  in  the  paper  tape  position. 


Example: 

PUNCHTAP  T180  PLT2 

The  EBCDIC  card  images  on  the  tape  mounted  on  tape  unit  180  will  be  punched 
on  paper  tape  in  FIELDATA  code. 

Console  Message: 

PAPER  TAPE  PUNCH  ERROR  aaa.  STATUS  =  b  SENSE  =  cc 

Where  aaa  is  either  UEX  for  unit  exception  or  UCK  for  unit  check,  b  is  a  number 
indicating  the  status  of  the  sense  command,  i.e. ,  sense  byte  flag  from  sense 
operation  (see  SVC19-SNSADR),  and  cc  are  two  hexadecimal  numbers  representing 
the  sense  byte. 
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FIELDATA  Translation  Table: 


EBCDIC  Code 


Graphic 


FIELDATA  Code 


029  Card  Code 

Hex 

Octal 

None 

40 

space 

05 

12-8-2 

4A 

0 

01 

12-8-3 

4B 

• 

75 

12-8-4 

4C 

< 

43 

12-8-5 

4D 

( 

51 

12-8-6 

4E 

+ 

42 

12-8-7 

4F 

1 

77 

12 

50 

42 

11-8-2 

5A 

t 

55 

11-8-3 

5B 

$ 

47 

11-8-4 

5C 

* 

50 

11-8-5 

5D 

) 

40 

11-8-6 

5E 

* 

73 

11-8-7 

5F 

“ 1 

76 

11 

60 

- 

41 

0-1 

61 

/ 

74 

0-8-3 

6B 

> 

56 

0-8-4 

6C 

7 

/o 

02 

0-8-5 

6D 

46 

0-8-6 

6E 

> 

45 

0-8-7 

6F 

? 

54 

8-2 

7A 

• 

53 

8-3 

7B 

# 

00 

8-4 

7C 

@ 

57 

8-5 

7D 

» 

72 

8-6 

7E 

= 

44 

8-7 

7F 

T» 

52 

12-1  thru  12-9 

Cl  -  C9 

A  thru  I 

06  thru  16 

11-1  thru  11-9 

D1  -  D9 

J  thru  R 

17  thru  27 

0-2  thru  0-9 

E2  -  E9 

S  thru  Z 

30  thru  37 

0  thru  9 

F0  -  F9 

0  thru  9 

60  thru  71 

end  of  card 

FA  FB 

None 

04  followed 

FIELDATA  Graphic 
(where  different) 


(\)  Upper  case 


(t) 

(+) 


(□)  tab 


(%)  Lower  case 


(ft)  space 
«i>  )  stop  code 


NOTE:  Any  EBCDIC  configuration  not  on  this  table  will  be  converted  to  FIELDATA 

OCTAL  00  which  is  not  punched  but  merely  advances  the  paper  tape  i  character 
position. 
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LESTER 


Lincoln  Laboratory  Multi -Programming  Supervisor 
Job  Operating  Instruction 
LESTER  Job 

14  November  1966 


Job  Summary: 

The  LES  Telemetry  Program  (LESTER)  receives  LES  telemetry  data  via  one  of 
the  LES  telephone  lines  from  the  tracking  station;  formats  the  input  data  into  printable 
records;  and  outputs  these  records  onto  either  a  7  or  9-track  tape. 

General  Information: 

The  LESTER  job  reads  960  byte  input  records  from  any  one  of  the  LES  telephone 
lines.  Each  input  record  is  converted  to  EBCDIC  code,  headed  with  a  4 -byte  identifier, 
formatted  for  printing,  and  written  onto  an  output  tape  as  thirty  133 -byte  records.  The 
tape  may  later  be  listed  using  the  LLMPS  PRINT  job  as  shown  in  the  sample  listing. 

In  its  present  form,  LESTER  will  lose  the  first  character  of  every  960  character 
input  record.  This  somewhat  annoying  peculiarity  is  caused  by  a  supervisor/hardware 
incompatability  and  cannot  now  be  easily  fixed.  To  make  this  character  loss  more  palatable, 
the  program  will  synchronize  its  reading  so  that  after  the  first  3  records,  the  lost 
character  of  every  successive  record  will  be  the  frame-synchronization  character.  Also, 
if  synchronization  is  lost,  the  routine  resynchronizes  itself  within  the  next  three  successive 
records.  This  synchronization  ability,  combined  with  a  large  input  record  size  (currently 
set  at  960  bytes),  will  lessen  the  effect  of  the  lost  characters. 

Task  Request  Summary: 

LESTER  Xnnn  Txxx 

Switch  Bit  0:  Terminate  immediately. 

Task  Request  Format: 

Jobname:  LESTER 

Units:  Xnnn  Txxx 

where  nnn  is  the  last  3  digits  of  the  LES  extension  and  xxx  is  a 
tape  unit  address. 


Fyyyy  1 
(FE349)  J 
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The  valid  LESTER  input  telephone  lines  are  Lincoln  Laboratory  extensions  7702, 
7704,  and  7706.  Any  one  of  these  lines  may  be  used  for  transmitting  the  LES  data  to 
the  computer.  If  any  of  the  other  computer  input  lines  are  used,  LESTER  will  immediately 
terminate  with  an  intervention  required  message  typed  on  the  console  typewriter. 

Parameter:  Fyyyy  Default:  FE349 

where  yyyy  is  the  hexadecimal  representation  of  one  of  the  pairs 
of  the  frame-synchronization  characters. 

Job  Termination: 

The  LESTER  job  will  terminate  with  an  error  message  if  no  frame -synchronization 
characters  are  found  in  the  first  input  record.  A  normal  termination  is  assumed  to  have 
occurred  when  either  the  sending  data  set  signals  intervention  required  (goes  out  of  data 
mode)  or  when  switch  bit  0  is  set.  At  all  terminations  the  LES  line  will  be  disabled,  file 
marks  (EOF)  written  on  the  output  tape,  and  the  tape  rewound  and  unloaded. 

Example: 

LESTER  X702  T180  F1CBC 

The  LESTER  job  is  initiated  from  line  7702  and  will  write  the  telemetry  data  on 
tape  unit  180  using  ICBC  as  the  frame  synchronization  character. 

Console  Message: 

1.  NO  SYNC.  CHARS.  PLEASE  NOTIFY  LESS  STATION. 

When  the  synchronization  character  cannot  be  found  in  the  first  input 
record,  the  message  is  printed  on  the  console  typewriter  and  the  job 
continues  processing  ignoring  synchronization  characters. 

Telemetry  Input: 

Because  of  its  synchronization  property,  LESTER  is  extremely  dependent  upon  the 
format  or  the  input  data.  The  telemetry  input  is  assumed  to  have  the  following  form: 

i)  2  frame -synchronization  characters 

ii)  6  sequences  of  data  with  each  sequence  consisting  of 
4  data  characters  followed  by  a  parity  character. 

iii)  Complement  of  the  previous  frame-synchronization 

characters  followed  by  the  above  data  sequences. 

The  input  sequence  then  repeats  starting  with  the  original  frame-synchronization 
characters.  (See  Fig.  III.  B.  17-1). 


III.  B.  17-2 


Values  of  either  pair  of  frame-synchronization  characters  are  input  from  the 
console  typewriter  when  the  job  is  started.  The  other  format  properties  of  the  input 
stream,  (i.  e. ,  length  of  sequences  etc. ),  are  fixed  and  LESTER  will  have  to  be  modi¬ 
fied  if  these  are  to  change. 


ffddddpddddpddddpddddpddddpddddpf 'f 'd. . . .  pffd. . . .  pf 'f 'd 


Telemetry  Input  Stream 


f'f'  =  complement  of  ff 
d  =  data  character 


ff  =  frame  synchronization  characters 
p  =  parity  character 


All  characters  consist  of  8  bits  =  2  hexadecimal  digits. 

Fig.  III.  B.  17-1.  Assumed  Format  for  Telemetry  Input. 

LESTER  Output  Tape: 

TTie  LESTER  output  tape  is  written  in  fixed  length  133-byte  records.  Each  record 
is  written  in  EBCDIC  code  where  the  initial  character  of  each  record  is  a  FORTRAN  type 
carriage -control  character.  The  general  format  of  the  tape  is  a  column-heading  record 
followed  by  60  data  records  with  the  sequence  repeating  with  the  column-heading  record. 

The  60  data  records  represent  two  960-byte  input  records.  Each  input  record  is  written 
as  30  output  records.  The  first  output  record  for  an  input  record  contains  a  4-byte  input 
record  identifier  followed  by  the  frame -synch,  character,  the  data,  and  the  parity  sequence 
up  to  the  second  frame-synch,  characters.  The  lost- character  is  the  initial  output  character 
of  this  sequence  and  it  is  always  written  as  **.  The  subsequent  29  output  records  repeat 
the  frame-synch,  to  frame-synch,  sequence  but  eliminate  the  input  record  identifier  and 
the  lost  character  marker.  The  last  record  on  the  tape  consists  of  3  successive  tape  marks. 
A  columnar  description  of  one  sequence  of  output  on  the  tape  is  shown  below. 

During  the  three  input-record  synchronization  sequences,  a  slightly  different  format 
is  used.  The  first  two  input  records  during  this  sequence  are  96  bytes  in  length.  Each  of 
these  records  is  written  out  as  an  identifier  record  followed  by  9  data  records.  Note  that 
only  the  first  3  records  in  this  output  will  contain  telemetry  data.  All  of  the  remaining 
records  will  be  zeroed.  Also  the  lost-data  byte  of  these  records  may  be  telemetry  data 
instead  of  a  synch,  character. 

The  third  input  record  will  be  between  96  and  128  bytes  in  length.  This  is  written 
out  as  an  identifier  record  followed  by  29  data  records.  The  lost  character  will  be  a 
frame-synch,  character  and  all  non-telemetry  output  records  will  be  zeroed. 

All  subsequent  input  records  are  960  bytes  in  length  and  are  written  out  in  the 
standard  format. 
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Format  of  the  Column  Heading  Record  : 

Item 

Columns 

Carriage  Control 

i 

A  skip  to  new  page  followed  by  a  print  and 
skip  1  line  (X*  FI') 

Heading  Information 

2-133 

Column  headings  for  the  output. 

ID  =  identifier  for  input  record 

FS  =  frame-synch,  column 

D  =  data  column 

P  =  parity  character  column 

Format  of  Initial  Output  Data  Record  for  an  Input  Record 


Item 

Columns 

Carriage  Control 

1 

A  print  and  skip  1  line  character  (x'40') 

Input  Record 

Identifier 

4-11 

Columns  4-5  contain  the  sense  byte  associ¬ 
ated  with  the  input  record;  columns  6-7  are 
zero  and  columns  8-11  contain  the  sequential 
input  record  number  for  this  record. 

Lost  Character 

14-15 

This  character  was  lost  in  the  2702.  It 
is  designated  by  **  in  columns  14  and  15. 

Frame-Synch. 

Character 

16-17 

Starting  with  input  record  number  4,  these 
columns  should  contain  the  second  character 
of  one  of  the  pairs  of  the  frame-synch,  char¬ 
acters.  On  the  following  output  record  this 
character  should  be  complemented. 

Data  Characters 

20-27 

34-41 

48-55 

62-69 

76-83 

90-97 

Data  characters  written  as  2  hexadecimal 
digits  per  data  character. 

Parity 

30-31 

44-45 

58-59 

72-73 

86-87 

Parity  character  for  the  preceeding  4  data 
characters 

All  non-specified  columns  are  written  as  EBCDIC  blanks  (x'40'). 
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Format  of  Remaining  Output  Records  for  an  Input  Record  ; 


Columns 

1  Print  and  skip  character  (x'40*) 

14-17  Both  frame-synch,  characters  will  appear 

on  this  and  the  following  28  output  records. 
These  characters  will  be  complemented  on 
each  record.  If  synchronization  has  been 
lost,  these  characters  will  not  have  the  ex¬ 
pected  pattern.  Synchronization  may  again 
be  attained  on  the  third  input  record  follow¬ 
ing  this  record. 

Data  Characters  Same  as  initial  record 

Parity  Characters  Same  as  initial  record 

Again,  all  non-specified  characters  are  written  as  blanks. 


Item 

Carriage  Control 
Frame-synch. 
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Example  Listing  of  a  LESTER  Output  Tape 
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♦Note:  This  listing  was  obtained  when  there  were  telemetry  and  tape  unit  hardware  problems. 
As  a  result,  the  values  of  the  frame-sync,  and  data  characters  may  be  incorrect. 

The  format,  however,  is  correct. 
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LOAD 


Lincoln  Laboratory  Multi -Programming  Supervisor 
Job  Operating  Instructions 
LOAD  Job  (Re-entrant) 

1  April  1967 


Job  Summary: 

The  LOAD  program  relocates  and  loads  assembled  LLMPS  programs  and  program 
joblists  into  core. 

General  Information: 

The  LOAD  program  relocates  and  loads  into  storage  assembled  LLMPS  job 
programs  and  joblist  programs.  LLMPS  job  programs  and  joblist  programs  may  be 
assembled  using  IBM  BPS  or  OS/360.  The  LOAD  program  allows  corrections  to  be  made 
to  assembled  programs  at  load  time.  It  also  establishes  linkages  between  separately 
assembled  programs  that  are  resident  in  core  as  part  of  the  LLMPS  system  and  the 
assembled  program  being  loaded.  The  LOAD  program  re-evaluates  and  adjusts  address 
constants  used  by  the  assembled  program  during  the  loading  procedure.  The  assembled 
job  program  must  contain  only  a  single  control  section.  Multiple  jobs  may  be  contained 
within  the  control  section.  No  subroutines,  other  than  those  preloaded,  may  be  used  by 
the  assembled  job  program. 

Processing  of  Object  Decks: 

The  LOAD  program  recognizes  as  input  five  types  of  cards.  Four  of  these  are 
generated  by  the  assembler: 

1.  EXTERNAL  SYMBOL  DICTIONARY  (ESD) 

The  ESD  card  contains  the  external  symbols  defined  or  referred  to  by 
the  program.  Each  entry  on  an  ESD  card  may  be  classified  as:  a  program 
segment  name,  an  ESD  TYPE  0;  an  entry  point  in  the  program  segment,  an  ESD 
TYPE  1;  and  an  external  name  referred  to  by  the  program,  ESD  TYPE  2. 

2.  TEXT  CARD  (TXT) 

The  TXT  card  contains  the  instructions  and  data  of  the  program. 

3.  RELOCATION  LIST  DICTIONARY  (RLD) 

The  RLD  card  contains  information  about  address  constants  in  the 
program. 
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4.  END  CARD  (END) 

The  END  card  signified  termination  of  the  program. 

The  fifth  card,  the  REPLACE  (REP)  card  is  supplied  by  the  programmer  to  modify  the 
instructions  and  data  of  the  assembled  program  at  load  time.  Replace  cards  are  printed 
on  the  console  typewriter  during  the  loading  process.  For  a  detailed  description  of  these 
cards  refer  to  IBM  System/360  Basic  ProgrammingSupportBasicUtilities,  C28-6505. 

Storage  Map: 

The  LOAD  program  lists  the  program  segment  and  entry  point  names  with  their 
current  storage  addresses  on  the  console  typewriter  during  the  loading  process. 


Table  of  External  References: 


The  assembled  LLMPS  program  may  refer  externally  to  the  following  program 
segments  resident  in  core  as  part  of  LLMPS  system. 


JOBTBL 

MAXADD 

BUFMAX 

FNDJTL 

FBJTJL 

FJBLST 

JOBLST 

FIDCQ 

BTOHEX 

EBTOXT 

XTTOEB 

HEXBIN 

TRANSX 

CDSTUC 

CDRDUC 

CDPNUC 

CDPNUE 

TPWRUC 

TPRDUC 

PRTUC 

PRTUE 

GOCK 

TOBIN 

HXTOBN 


Pointer  to  start  of  job  tables 
Maximum  core  address 
Maximum  buffer  size 
Find  job  table  location  routine 
Free  buffers,  job  table,  and  joblist  routine 
Find  job  list  routine 
Pointer  to  start  of  joblists  in  core 
Free  I/O  devices  and  CPU  queue  routine 
Binary  to  hex  conversion  routine 
EBCDIC  to  2741  code  conversion  routine 
2741  code  to  EBCDIC  conversion  routine 
Table  for  converting  from  EBCDIC  hex  characters 
to  binary  values 

Translates  n  bytes  according  to  table 
Feed  and  select  stacker  UC  routine 
Card  reader  UC  routine 
Card  punch  UC  routine 
Card  punch  UE  routine 
Tape  write  UC  routine 
Tape  read  UC  routine 
Printer  UC  routine 
Printer  UE  routine 
Unit  check  routine  for  LESTER 
Translates  and  packs  n  unpacked  characters  into 
(N  +  l)/2  bytes  according  to  any  table-entry  point 
Hex  to  binary  conversion  routine 
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GOEX 

WTM 

ERG 

FSR 

BSR 

BSF 

FSF 

REW 

RUN 

GETPRM 

XEDT 

XEX 

XCK 

XSIO 

RDIT 

TRDIT 

SNDIT 

TSNDIT 


UE  routine  for  LESTER 
Write  tape  mark  routine 
Erase  record  gap  routine 
Forward  space  tape  n  records  routine 
Backspace  tape  n  records  routine 
Backspace  tape  n  files  routine 
Forward  space  tape  n  files  routine 
Rewind  tape  to  load  point  routine 
Rewind  and  unload  tape  routine 

Locates  a  parameter  in  a  message  for  2741/2702  routine. 
Performs  desired  erasures  of  a  message  to  2741/2702 
routine 

Routine  to  handle  unit  exceptions  for  all  commands  to 
2741/2702 

Routine  to  handle  unit  checks  for  all  commands  to  2741/2702 
Constructs  I/O  commands  for  2741/2702  operations  routine 
Reads  a  message  from  2741  routine 

Reads  a  message  from  2741  and  translates  it  to  EBCDIC 
routine 

Sends  a  message  to  the  2741  routine 
Translates  (EBCDIC  to  2741)  and  sends  a  message  to 
2741  routine 


Any  other  external  references  made  by  the  assembled  program  will  cause  the 
error  message,  'EXTERNAL  REFERENCE  NOT  IN  TABLE',  and  termination  of  the 
loading  procedure.  The  last  entry  in  the  table  of  external  references  is  eight  blank 
characters.  Additional  entries  may  be  made  to  the  table  of  external  references  by 
reassembling  the  table  of  external  references  and  placing  the  assembled  deck  in  the 
LLMPS  system.  The  BPS  assembler  assigns  each  external  symbol  a  unique  ID  ranging 
from  2  through  15  thus  limiting  a  program  to  14  external  references.  The  OS/360 
assembler  allows  a  maximum  of  255  external  references  in  a  program.  The  LOAD 
program  will  load  only  a  job  program  that  has  14  or  less  external  references. 

Changing  Buffer  Size: 

The  size  of  the  buffer  into  which  the  LOAD  program  places  the  assembled  LLMPS 
job  program  is  2048  bytes.  If  the  length  of  the  assembled  program  exceeds  2048  bytes, 
the  LOAD  program  writes  the  message,  'ENLARGE  BUFFER  SIZE  TO  xxxxx'  on  the 
console  typewriter.  The  size  of  the  buffer  required  is  designated  by  xxxxx.  Use  the 
CHANGBUF  program  to  change  buffer  number  1  of  the  LOAD  program  as  follows: 

CHANGBUF  LOAD  SIZE  xxxxx  BFNO  1 
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System  Routines: 

The  system  card  unit  check  routines  CDRDUC,  CDSTUC,  and  the  system  con¬ 
version  routines  BTOHEX  and  HXTOBN  are  used.  The  LOAD  program  uses  three  tables 
of  external  references  with  DC  statements  that  contain  addresses  of  system  subroutines 
(described  under  external  references).  The  tables  are  EXTAB  L  EXTAB2,  and  EXTAB3. 
These  tables  are  resident  in  the  LLMPS  system. 

Task  Request  Summary: 

LOAD  RDRr 

Task  Request  Format: 

Jobname:  LOAD 

Units:  RDRr 

where  r  is  the  address  of  a  2540  card  reader.  If  there  is 
only  one  reader  attached  to  the  system,  the  reader  unit  is 
not  specified. 

Parameters:  None 


Operating  Instructions: 

The  LOAD  program  must  not  be  used  to  load  an  assembled  LLMPS  job  program  or 
joblist  program  which  is  resident  in  core  as  part  of  the  current  LLMPS  system.  The 
LOAD  program  is  part  of  the  current  LLMPS  system;  it  should  be  used  only  to  load 
assembled  job  programs  and  joblist  programs  that  are  in  the  testing  stage  or  that  are 
used  infrequently. 

The  LOAD  program  cannot  be  terminated  using  the  TERM  job.  The  UNLOAD  job 
must  be  used  to  remove  the  assembled  LLMPS  job  program  and  joblist  programs  placed 
in  core  via  the  LOAD  program. 

Because  LOAD  reads  until  the  reader  is  empty  the  user  of  the  LOAD  program  must 
place  one  assembled  job  program  followed  by  the  joblist(s)  into  the  reader.  The  user 
must  not  stack  jobs  in  the  card  reader.  A  maximum  of  six  joblist  programs  may  be 
loaded  with  one  assembled  job  program.  The  user  makes  the  reader  ready  and  then 
initiates  the  LOAD  program  via  the  console  typewriter. 

A  temporary  restriction  in  the  LOAD  program  requires  the  user  to  assemble 
separately  the  multiple  joblists  to  a  job  program. 
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Console  Messages:  Of  Indicates  that  the  task  terminates) 

1.  'xxxxxx  AT  LOCATION  zzzzzz' 

The  LOAD  program  prints  the  program  segment  and  entry  point  names  with 
their  storage  addresses  on  the  console  typewriter,  xxxxxx  indicates  a  program 
name  and  zzzzzz  its  address. 

2.  PROGRAM  LOADED 

Indicates  that  the  job  program  and  joblist  program (s)  have  been  successfully 
loaded  in  core.  The  loaded  job  program  may  be  initiated. 

3.  t  UNIDENTIFIABLE  CARD  READ 

Indicates  that  a  card  other  than  an  ESD,  TXT,  RLD,  END  or  REP  card  was 
read  by  the  program.  The  task  terminates. 

4.  t  INVALID  ESD  EXTENDED  CARD  CODE 

The  assembler  assigns  a  code  to  an  external  symbol  dictionary  card  (ESD) 
identifying  this  card  as  a  program  name  card,  entry  point  card,  or  external 
symbol  card.  The  assembler  assigns  a  code  of  0  to  the  program  name  card, 
a  code  of  1  to  an  entry  point  card,  and  a  code  of  2  to  an  external  symbol  card. 

Any  other  code  is  invalid  and  causes  the  task  to  terminate. 

5.  t  ESD  TYPE  0  NOT  FIRST 

The  program  name  card  designated  as  the  ESD  TYPE  0  card  must  be  the  first 
card  of  an  object  deck.  If  not,  the  task  terminates. 

6.  t  INVALID  ESID 

The  assembler  assigns  an  external  symbol  identification  number  of  1  to  program 
name  cards  and  entry  point  cards.  On  an  external  symbol  card,  the  load  program 
expects  an  ESID  ranging  from  2  to  15  and  so  there  may  not  be  more  than  14 
external  references  in  any  given  program  segment.  The  task  terminates. 

7.  t  EXTERNAL  REFERENCE  NOT  IN  TABLE 

The  external  symbol  card  reference  is  not  contained  in  the  system  tables  of 
allowable  external  references.  The  task  terminates. 

8.  t  TXT  ADDRESS  BELOW  BUFFER 

The  address  in  storage  where  the  information  on  the  text  card  is  to  be  loaded  is 
below  the  buffer  start  address.  The  task  terminates. 


III.  B.  18-5 


9.  t  TXT  ADDRESS  EXTENDS  BEYOND  BUFFER 

The  address  in  storage  where  the  information  on  the  text  card  is  to  be  loaded 
is  beyond  the  buffer  end  address.  The  task  terminates. 

10.  t  ENLARGE  BUFFER  SIZE  TO  xxxxx 

The  buffer  size  of  the  load  program  must  be  increased  to  xxxxx  bytes.  The  task 
terminates. 

11.  t  ILLEGAL  CHARACTER  IN  REPLACE  CARD 

The  program  has  found  a  character  other  than  hex  digits  0-9,  or  A- F  in  a 
replace  card.  The  task  terminates. 

12.  t  ODD  ADDRESS  IN  REPLACE  CARD 

The  starting  address  in  hexadecimal  of  the  area  to  be  replaced  with  information 
contained  on  the  REP  card  must  be  on  a  half  word  boundary.  The  task  terminates. 

13.  t  MORE  THAN  11  FOUR-DIGIT  FIELDS  IN  REPLACE  CARD 

A  replace  card  can  have  a  maximum  of  11  four -digit  hexadecimal  fields  of 
corrections.  Each  field  is  separated  from  the  previous  field  by  a  comma  and 
replaces  one  previously  loaded  half-word.  If  more  than  eleven  fields  are 
present,  the  task  terminates. 

14.  t  JOBLIST(S)  MISSING 

No  joblist  has  been  read  by  the  LOAD  program.  The  task  terminates. 

15.  t  PROGRAM  ENTRY  NOT  FOUND  FOR  JOBLIST  EXTERNAL  REFERENCE 

The  external  reference  made  by  the  loaded  joblist  does  not  correspond  to  the  loaded 
program  segment  or  its  entry  points.  The  joblist  is  illegal  and  the  task  terminates. 

16.  t  JOBLIST  PROGRAM  REPLACE  CARD  ADDRESS  INVALID 

The  address  specified  on  the  replace  card  for  a  joblist  program  is  invalid. 

The  task  terminates. 

17.  t  JOBLIST  TXT  EXCEEDS  JOBLIST  BUFFER 

The  JOBLIST  may  contain  only  16  bytes  of  text  information.  The  task  terminates. 

18.  t  ONLY  x  JOBLIST(S)  MAY  BE  LOADED  AT  PRESENT. 

There  is  room  for  only  x  joblists  in  core.  The  task  terminates. 
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19.  t  MORE  THAN  SIX  JOBLISTS 

The  LOAD  program  only  allows  six  joblists  to  be  associated  with  the  job  program 
which  it  is  loading.  The  task  terminates. 

20.  t  DUMMY  JOBLIST  NOT  FOUND 

A  dummy  joblist  to  be  replaced  in  core  by  the  loaded  joblist  is  not  available. 

The  task  terminates. 

21.  t  DEVICE  NOT  FREED 

The  reader  has  not  been  freed  once  the  load  program  has  loaded  the  job  program 
and  joblists  into  core.  The  task  terminates.  If  this  condition  persists,  notify 
a  system  programmer. 

Program  Logic: 

The  LOAD  program,  at  initiation,  requests  a  buffer  of  2048  bytes.  Into  this 
buffer,  the  LOAD  program  loads  the  assembled  LLMPS  program.  After  all  cards  have 
been  read,  the  LOAD  program  searches  through  the  joblist  storage  area  of  core  for  the 
DUMMY  joblists.  There  are  six  dummy  joblists  resident  in  core  as  part  of  the  LLMPS 
system.  These  dummy  joblists  are  replaced  with  the  loaded  joblist  programs.  A 
maximum  of  six  joblist  programs  may  be  loaded  with  one  job  program.  If  the  LOAD 
program  doesn't  find  a  dummy  joblist  in  core,  a  message,  'DUMMY  JOBLIST  NOT 
FOUND,  '  will  appear  on  the  console  typewriter.  If  the  LOAD  program  doesn't  find 
enough  dummy  joblists  to  be  replaced  by  the  loaded  joblists,  the  message,  'ONLY  x 
JOBLISTS  MAY  BE  LOADED  AT  PRESENT'  will  be  printed  on  the  console  typewriter. 

In  each  case  the  job  terminates. 


A  description  of  the  16  byte  dummy  joblist  entry  follows: 


DUMLST 


START 

0 

EXTRN 

UNLOAD 

DC 

C 'DUMMY LST' 

DC 

C’l’ 

DC 

x'00' 

DC 

H'OOOO’ 

DC 

END 

A(UNLOAD) 

When  loading  is  complete,  the  LOAD  program  writes  a  message,  'PROGRAM 
LOADED',  to  the  operator  and  then  issues  an  SVC  FREE  to  release  the  reader  device. 
The  LOAD  program  then  issues  an  SVC  POPQ  to  remove  the  LOAD  job  from  the  CPU 
QUEUE.  Such  action  relinquishes  control  of  the  central  processing  unit  without  termin¬ 
ating  the  job.  If  the  reader  device  cannot  be  freed,  the  LOAD  program  will  write  a 
message  on  the  console  typewriter  and  will  terminate.  Since  the  LOAD  job  does  not 
normally  terminate  after  the  loading  function,  its  buffer  is  not  cleared. 

The  overall  structure  of  the  LOAD  program  is  described  in  the  flow  charts  that 

follow: 
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LOAD 
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Program 
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Job  Table 
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Initialize 
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Variables 
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Select  Stacker 
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Command 
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READ 
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UNLOAD 


Lincoln  Laboratory  Multi -Programming  Supervisor 
Job  Operating  Instructions 
UNLOAD  Program  (Re-entrant) 

20  March  1967 


Job  Summary: 

The  UNLOAD  program  removes  from  core  storage  the  job  programs  and  joblist 
programs  loaded  into  core  by  the  LOAD  program. 

General  Information: 

The  UNLOAD  program  unloads  job  programs  and  joblist  programs  previously 
loaded  by  the  LOAD  program.  The  UNLOAD  program  replaces  the  joblists  with  the 
DUMMY  joblists.  With  a  branch  to  the  system  routine  FBJTJL,  the  UNLOAD  program 
frees  the  buffers,  job  table,  and  joblist  of  the  LOAD  task  that  loaded  the  job  program 
and  joblist  programs  into  core. 

The  system  routine  FBJTJL  is  used  by  the  UNLOAD  program. 

Task  Request  Summary: 

UNLOAD 

Task  Request  Format: 

Jobname;  UNLOAD 

Units:  No  devices  used. 

Parameters:  None 

Operating  Instructions: 

Upon  initiation,  the  UNLOAD  program  will  type  a  message  on  the  console  type¬ 
writer  requesting  the  operator  to  type  the  name  of  the  program  to  be  unloaded.  The 
operator  should  then  type  the  name  of  the  program  to  be  unloaded.  For  unloading  the 
TPCHECK  job,  the  console  listing  would  look  as  follows: 

0001  UNLOAD  OPERATOR  TYPE  JOBNAME 
0001  UNLOAD  . . .  tpcheck 

The  UNLOAD  job  unloads  every  job  program  contained  within  the  same  control  section 
as  the  job  program  whose  name  is  supplied  by  the  operator,  provided  that  none  of  these 
jobs  is  active.  If  the  jobname  typed  or  any  of  the  other  jobs  in  the  control  section  is 
active,  the  UNLOAD  program  will  not  perform  its  function  and  will  terminate. 
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Console  Messages:  (t  indicates  task  terminates) 


1.  OPERATOR  TYPE  JOBNAME 

The  UNLOAD  program  requests  the  operator  to  type  the  name  of  the  program 
to  be  unloaded.  The  UNLOAD  program  then  issues  an  SVC  READ  to  obtain  the 
operator's  reply. 

2.  f  xxxxxxxx  UNLOADED 

The  UNLOAD  program  lists  the  programs  unloaded  (designated  by  xxxxxxxx) 
and  then  terminates. 

3.  t  xxxxxxxx  NOT  LOADED  BY  LOAD  PROGRAM 

The  LOAD  program  did  not  place  the  job  program  in  core  storage.  The  name 
of  the  job  program  is  designated  by  xxxxxxxx.  The  task  terminates. 

4.  f  xxxxxxxx  IS  ACTIVE 

The  program  (designated  by  xxxxxxxx)  is  active  and  therefore  must  not  be 
unloaded  at  present.  The  task  terminates. 

5.  t  CATASTROPHIC  ERROR  NOTIFY  DIANA 

A  job  list  entry  can't  be  found  in  the  job  list  area  of  core  storage  for  a  program 
loaded  via  LOAD.  This  is  an  impossible  situation.  The  task  terminates. 

Program  Logic: 

The  LOAD  task  that  loaded  the  job  and  joblist(s)  is  then  terminated  with  the  code 
UNLD.  The  UNLOAD  program  lists  the  names  of  the  program (s)  unloaded  on  the 
console  typewriter  and  terminates.  The  structure  of  the  UNLOAD  program  is 
revealed  by  the  following  flow  diagrams. 
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Flow  Diagram  of  UNLOAD  Program 
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Lincoln  Laboratory  Multi -Programming  Supervisor 
Job  Operating  Instructions 
SHARE  Job 
1  April  1967 


Job  Summary: 

The  SHARE  job  will  list  and  punch  catalog  and/or  order  cards  from  a  SHARE 
Distribution  Tape  Reel  (DTR)  or  will  retrieve  source  and  object  decks  from  the  DTR 
or  from  a  SHARE  Series  Library  Tape  (SLT). 

General  Information: 

The  SHARE  DTR  and  SLT  tapes  are  assumed  to  have  the  SHARE  Distribution 
Tape  Reel  format  and  the  SHARE  Library  Tape  format  as  of  December  12,  1966.  These 
formats  are  described  in  program  write-ups  from  the  IBM  1401  General  Program  Library, 
file  numbers  1401-13.1.026,  1401-13. 1. 028  and  1401-13.1.032. 

SHARE  uses  the  system  subroutines  TPRDUC,  PRTUC,  PRTUE,  CDRDUC,  CDSTUC 
and  CDPNUC. 


Job  Request  Summary: 

SHARE  RDRr 


PC  He 


PTRp  Txxx  JOB 


n 


DEN2 

DEN5 

_(DEN8)_ 


Task  Request  Summary:  JOB  NAME  UNITS  PARAMETERS 

Jobname:  SHARE 

Units'.  RDRr  PC  He  PTRp  Txxx 

where  r  is  the  address  of  a  card  reader,  c  is  the  address  of  a 
card  punch,  p  is  the  address  of  a  printer,  and  xxx  is  the  address 
of  a  7-track  tape.  If  there  is  only  one  reader,  punch  or  printer 
attached  to  the  system,  the  addresses  of  the  respective  units  need 
not  be  specified.  All  four  devices  must  be  assigned  to  the  task 
even  though  each  job  requires  only  three  devices. 

NOTE:  The  reader  and  punch  must  be  on  the  same  2540  unit 
because  jobs  4  and  5  interleave  order  cards  from  the  reader 
with  punched  cards  from  the  punch  into  stacker  RP3. 
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Parameters : 


Density:  DEN2 


(200  bpi) 
(556  bpi) 
(800  bpi) 


Default:  DEN8 


DEN5 

DEN8 


Job: 


JOB  n 


Default:  Parameter 
required 


where  n  may  be  any  one  of  the  following 
job  request  numbers  depending  on  the 
task  desired: 


1- list  and  punch  catalog  and  order  cards 

2 - list  and  punch  catalog  cards 

3- list  and  punch  order  cards 

4- tape  to  card  from  a  SHARE  DTR 

5 - tape  to  card  from  a  SHARE  SLT 


Operating  Instructions: 

For  job  requests  4  and  5,  order  cards  placed  in  ascending  order  according  to  the 
deck  number  appearing  in  cols.  21-24,  are  read  from  the  card  reader.  If  the  cards  are 
not  in  ascending  order,  a  message  will  appear  on  the  console  typewriter  and  the  job 
terminated.  Each  order  card  followed  by  a  blank  card  precedes  its  corresponding  deck 
into  stacker  RP3  ,  For  jobs  1,  2,  and  3  punched  cards  are  also  fed  into  stacker  RP3 
with  a  blank  card  inserted  as  the  first  card  of  each  deck. 

Only  one  job  may  be  requested  at  a  time  and  for  jobs  1,  2,  3  and  4  the  tape  must 
be  positioned  at  load  point  at  job  initiation. 

Examples: 

1.  SHARE  RDRA  PCHB  PTRE  T181  JOB  1 

The  catalog  and  order  cards  on  tape  181  will  be  listed  on  printer  E  and 
punched  on  punch  B.  Even  though  the  reader  is  not  used  for  this  job, 
a  reader  unit  must  be  assigned. 

2.  SHARE  RDRC  PCHD  PTRF  T182  DEN5  JOB  5 

The  tape  on  182  is  read  at  556  bpi.  The  source  and  object  decks  requested 
by  the  order  cards  placed  in  reader  C  are  punched  on  punch  D.  A  printer 
is  not  required  for  this  job,  but  a  printer  unit  must  be  assigned. 

Console  Messages:  (t  implies  task  terminates) 

1.  t  PARAMETER  ERROR 

An  erroneous  parameter  was  typed. 
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2. 


t  NO  JOB  SPECIFIED 

The  job  parameter  was  not  supplied. 


3.  PARITY 

A  tape  parity  error  occured.  When  a  tape  parity  error  is  detected,  the  tape 
is  reread  15  times.  If  the  error  still  persists,  the  above  message  is  typed  on 
the  console  typewriter,  the  record  is  read  with  error,  listed  and/or  punched, 
and  the  job  continues.  No  indication  of  the  error  condition  appears  on  the  listing 
or  the  punched  card. 

4.  t  CARDS  NOT  IN  ASCENDING  ORDER 

The  deck  number  on  tape  is  greater  than  the  deck  number  on  an  order  card; 
therefore,  either  the  order  cards  were  not  placed  in  ascending  order  in  the 
reader  or  the  deck  requested  is  not  on  the  tape. 

5.  t  END  OF  JOB 

The  job  was  successfully  completed. 

6.  tx  TAPE  IMPROPERLY  POSITIONED 

Where  x  is  an  error  code  indicating  the  reason  the  program  considers  the  tape 
improperly  positioned.  The  error  codes  are: 

1- -An  unexpected  end  of  file  occured  while  attempting 

to  skip  tape  the  appropriate  number  of  records, 
corresponding  to  the  particular  job  request.  (See 
Program  Logic). 

2-  -The  physical  record  length  was  greater  than  1600 

bytes.  No  records  on  tape  (except  those  skipped 
while  properly  positioning  the  tape)  should  be 
greater  than  1600  bytes. 

3-  -The  physical  record  length  was  less  than  80  bytes. 

No  records  on  tape  should  be  less  than  80  bytes. 

4- -A  record  on  the  DTR  which  was  to  be  listed  and 

punched  was  not  written  in  even  parity. 

The  above  message  indicates  that  a  possible  program  error  exists,  that  the 
input  tape  was  improperly  written  or  positioned,  or  that  the  wrong  input  tape 
is  mounted.  The  program  requests  a  job  Dump  before  terminating. 
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7. 


t  PUNCH  UNIT  EXCEPTION 


Unit  exception  on  the  punch,  feed,  select  stacker  command  indicates  a  machine 
error.  Notify  CE. 

8.  t  FEED  UE 

Unit  exception  on  a  feed  command  indicates  machine  error.  Notify  CE. 

Program  Logic: 

Because  of  the  particular  format  of  the  DTR  tape,  the  program  upon  initiation 
and  before  tape  processing,  will  forward  space  a  DTR  tape  the  following  number  of  files 
and/or  records  depending  on  the  job  requested: 

JOB  FILES  RECORDS 

1  0  3 

2  0  3 

3  2  0 

4  2  2 

It  is  essential,  therefore,  that  the  tape  be  positioned  at  load  point  upon  job  initiation. 
The  following  is  a  flow  chart  of  the  SHARE  program. 
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IV.  The  Job  Program 


Lincoln  Laboratory  Multi -Programming  Supervisor 
18  April  1966 


IV.  The  Job  Program 

A.  Writing  a  Job  Program 

B.  Supervisor  Call  Summary 

C.  Supervisor  Calls 

D.  Job  Program  Subroutines  (Unit  Check  Routines) 


IV-0 


Lincoln  Laboratory  Multi -Programming  Supervisor 


15  July  1966 


IV -A.  Writing  a  Job  Program 

1.  The  Job  Header 

2.  Entry  to  a  Job  Program 

3.  The  Job  List 

4.  Use  of  Job  Sense  Switches 
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The  Job  Header 


Each  job  program  is  prefixed  by  a  job  header.  The  job  header  specifies  the 
location  in  the  job  program  of  the  first  instruction  to  be  executed,  the  number  of  devices 
and  buffers  which  the  job  requires,  the  device  name  of  each  device,  and  the  size  of  each 
required  buffer.  The  format  of  the  job  header  is: 


*  Location  of  First  Job  Instruction 

*  NJBDVU  *  NJBBFU 

*  Names  of  Required  Devices 

*  (4  Bytes) 

* 

* 

* 

*  Sizes  of  Required  Buffers 

*  (4  Bytes ) 

* 

•  •  • 

* 

* 

NJBDVU  =  Number  of  Devices  Used 

NJBBFU  =  Number  of  Buffers  Used 

An  illustrative  360  coding  sequence  of  a  job  using  two  devices  and  three  buffers  is  shown  below. 


JOB 

START 

0 

DC 

A(BEGADR) 

DC 

H'2’ 

DC 

H’3* 

DC 

CL4’PTR’ 

DC 

CL4’7TP’ 

DC 

F’128’ 

DC 

F’2048’ 

DC 

• 

F’2048* 

BEGADR 

• 

EQU 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 


The  number  of  required  devices  are  specified  in  the  field  NJBDVU  and  the  number 
of  required  buffers  are  specified  in  the  field  NJBBFU.  The  device  names  for  each  required 
device  must  be  given  in  the  full  words  following  the  word  specifying  the  number  of  devices. 
The  size  of  each  required  buffer  must  be  given  in  the  full  words  following  the  device  names. 
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Device  names,  specifying  the  device  requirement,  are  four  characters,  left  justified, 
with  trailing  blanks.  Device  names  are: 


2540  Card  Reader 
2540  Card  Punch 
1403  Printer 
7- Track  Tape  Unit 
9 -Track  Tape  Unit 

Either  7- Track  or  9 -Track  Tape  Unit 

2311  Disk  Unit 

2701  Parallel  Adapter 

Calcomp  Plotter 

2250  Display  Scope 

2260  Display  Terminals 

2741  Typewriter  Terminal 

Teletype  Terminal 

1050  Console  Typewriter . 


RDR 

PCH 

PTR 

7  TP 

9  TP 

TP 

DISK 

PDA 

PLOT 

SCOP 

DISP 

TYPE 

TTY 

CONS 


The  order  in  which  the  device  names  are  specified  determines  a  logical  device 
number  (LDN)  for  each  device,  where  the  first  device  specified  is  logical  device  one. 
When  a  job  program  issues  a  supervisor  call,  the  device  to  which  the  call  is  associa¬ 
ted  is  indicated  by  the  logical  device  number.  In  this  way  a  job  program  can  be  written 
independently  of  the  physical  address  of  a  device. 
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2.  Entry  to  a  Job  Program 

When  a  job  program  is  successfully  initiated  from  the  console  typewriter,  control 
is  passed  to  the  first  instruction  as  specified  in  the  Job  Header.  Three  locations  in  the 
Job  Table  associated  with  the  job  are  indicated  in  General  Registers  0,  1  and  2.  General 
Register  0  contains  the  address  of  the  pseudo  Sense  Switches,  General  Register  1  contains 
a  pointer  to  the  list  of  buffer  addresses,  and  General  Register  2  contains  a  pointer  to  the 
list  of  input  parameters.  If  an  input  parameter  is  alphanumeric,  it  is  right  justified  with 
leading  blanks.  If  an  input  parameter  is  a  decimal  integer,  it  is  converted  to  a  four  byte 
signed  binary  number.  The  list  of  input  parameters  is  terminated  with  a  fence  of  FFFFFFFF. 
If  there  are  no  input  parameters,  the  first  word  of  the  parameter  list  will  be  the  fence. 
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3.  The  Job  List 

For  each  job  which  is  to  be  run  under  the  supervisor,  there  must  be  an  entry  in  the 
Job  List.  The  Job  List  consists  of  a  collection  of  Job  List  Entries.  The  Job  List  Entry 
indicates  whether  the  job  is  re-entrant  and  gives  the  location  of  the  job.  Each  Job  List 
Entry  is  assembled  as  a  separate  subprogram,  and  contains  the  Entry  name  of  the  job 
program  as  an  Extern  in  the  Job  List  Entry  Subprogram.  The  format  of  a  Job  List  Entry 
is: 


*  (Job  Name)  * 

*  (8  characters)  * 

*  Version  *  Flag  *  Task  number  * 

*  *  Job  program  address  * 

An  illustrative  360  coding  sequence  for  assembling  a  Job  List  Entry  is  shown  below: 


AUTHOR 

START 

0 

EXTRN 

JOB 

DC 

CL8*  JOBNAME' 

job  name  right  justified 

DC 

C'  1' 

version  number 

DC 

X’  80' 

re-entrant  job  flag  on 

DC 

H'  O' 

space  for  task  number 

DC 

A(J0B) 

location  of  job  header 

END 

The  byte  labeled  Version  can  be  used  to  indicate  that  a  modification  has  been 
made  to  the  job  program.  In  the  illustrative  coding  above,  Version  1  is  indicated. 

The  Flag  byte  specifies  whether  the  job  is  re-entrant.  Job  programs  may  be  written 
as  re-entrant,  whereby  a  single  copy  of  a  job  program  can  be  active  for  more  than 
one  task.  If  a  job  is  not  re-entrant,  there  must  be  a  separate  copy  of  the  job  program 
and  job  list  entry  subprogram  for  each  possible  concurrent  activation  of  the  job.  If 
a  job  is  re-entrant,  the  left  most  bit  of  the  flag  byte  is  set  to  1. 
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Associated  with  every  active  job  is  a  task  number  which  is  used  to  identify  the 
particular  activation  of  the  job  throughout  the  system.  If  a  job  is  not  re-entrant,  it 
can  be  active  for  only  a  single  task.  To  indicate  that  a  nonre-entrant  job  is  active,  the 
■supervisor  inserts  the  task  number  in  the  indicated  field  of  the  Job  List  Entry. 

Each  subprogram  which  makes  up  the  supervisor  deck  must  have  a  unique  name. 
Consequently,  each  Job  List  Entry  subprogram  must  also  have  a  unique  name.  It  is 
suggested  that  the  Job  List  Entry  subprogram  be  given  the  name  of  the  programmer  of 
the  job  program.  It  is  up  to  the  job  programmer  to  use  a  distinct  name  for  each  of 
his  Jobs  and  Job  List  Entry  subprograms.  The  name  of  each  Job  List  Entry  subprogram 
might  be  formed  from  the  author’s  name  and  a  sequence  number. 
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4. 


Use  of  Job  Sense  Switches 


All  job  programs  should  be  written  so  as  to  place  flag  bits  used  for  control 
into  the  sense  switch  area.  Not  only  does  this  favor  re-entrancy,  but  it  also  permits 
dynamic  control  of  job  parameters.  For  example,  the  PRINT  job  PC,  PCE,  SP  1,  and 
SP  3  options  could  vary  between  files  if  they  were  represented  by  sense  switch  settings. 
The  operator  could  thus  vary  the  mode  of  printing  without  terminating  and  re-initiating 
the  task  simply  by  invoking  the  SWITCHES  job. 

It  is  further  recommended  that  all  job  programs  include  the  following  standard 
sense  switch  meanings  and  use  them  to  permit  a  graceful  interruption  of  a  task; 

Sense  Switch  Bit  Function 


0 

Terminate  immediately 

1 

Terminate  at  end  of  record 

2 

Terminate  at  end  of  file 

3-6 

Reserved 

7 

Pause 

8-31 

As  desired  . 

The  terminations  accomplished  by  bits  1  and  2  should  be  "clean;"  that  is,  they 
should  allow  the  job  to  be  re -initiated  without  producing  any  different  results  than  if 
the  task  had  been  allowed  to  continue.  The  pause  function  of  bit  7  provides  a  means 
for  suspending  the  task.  It  should  be  implemented  by  coding  similar  to  the  following; 


PAUSE 

SVC 

DORMNT 

TM 

SWITCH,  1 

BC 

1,  PAUSE 

CONTIN 

EQU 

* 

continue  after  switch  is  0. 

The  use  of  switches  for  a  job  should  be  described  in  the  operating  instructions. 
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1  April  1967 


5.  Buffer  Sizes 


The  buffers  available  in  the  current  LLMPS  systems  (1  March  1967)  are  as 

follows: 

A.  Standard  Systems 

1)  6  buffers  of  96  bytes 

2)  6  buffers  of  200  bytes 

3)  3  buffers  of  512  bytes 

4)  4  buffers  of  1024  bytes 

5)  8  buffers  of  2048  bytes 

6)  3  buffers  of  4096  bytes 

B.  Large  Buffer  Systems 

1)  6  buffers  of  96  bytes 

2)  9  buffers  of  200  bytes 

3)  3  buffers  of  512  bytes 

4)  3  buffers  of  1024  bytes 

5)  7  buffers  of  2048  bytes 

6)  2  buffers  of  27656  bytes 

C.  360/67  Systems 

1)  16  buffers  of  256  bytes 

2)  16  buffers  of  512  bytes 

3)  16  buffers  of  1024  bytes 

4)  16  buffers  of  2048  bytes 

5)  4  buffers  of  32768  bytes 
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IV -B.  Supervisor  Call  Summary 

Attached  are  two  forms  of  a  summary  sheet  for  all  present 
job  supervisor  calls.  One  form  gives  the  supervisor  calls 
and  their  calling  sequences  in  tabular  form;  the  other  form 
specifies  the  call  sequences  by  illustrative  360  calling  sequences. 
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Symbols  used  in  the  Supervisor  Call  Summary 


CTLST 

dump  control  list  address 

LDN 

logical  device  number  for  the  unit 

CAW 

channel  address  of  a  command 

RTNLST 

location  of  returns  list 

COUNT 

residual  count 

LMESAG 

number  of  bytes  in  message 

MESAGE 

location  of  text  to  be  written  on  the  on-line  typewriter 

BUFFER 

location  of  read  buffer 

CHARCT 

number  of  characters  read 

SNSBUF 

location  of  sense  buffer 

DEVID 

device  identification 

SVQMTY 

saved  I/O  queue  empty 

CANCEL 

read  terminated  by  a  CANCEL 

SNSOK 

sense  bytes  stored 

SNSBZY 

sense  command  rejected  because  of  busy  device 

SNSUC 

UC  on  sense  command  . 
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Supervisor  Call  Summary 
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0  for  non -immediate  operations;  3  for  immediate  operations;  and  1  for  initial  rejection. 
0  if  saved  I/O  Queue  is  empty;  1,  if  not. 

0  if  operator  pressed  cancel;  1,  if  not. 


SVC  Calling  Sequences 


The  calling  sequences  are  specified  by  illustrative  360  coding  sequences  where  the 
following  definitions  are  used: 


CTLST 

location  of  dump  control  list 

LDN 

logical  device  number  for  the  unit 

CAW 

location  containing  the  channel  address  of  a  command 

RTNLST 

location  of  returns  list 

COUNT 

location  to  store  residual  count 

LMESAG 

number  of  bytes  in  message 

MESAGE 

location  of  text  to  be  written  on  the  on-line  typewriter 

BUFFER 

location  of  read  buffer 

CHARCT 

location  to  store  number  of  characters  read 

SNSBUF 

location  of  sense  buffer 

DEVID 

location  to  store  device  identification 

Instructions  transferred  to  after  testing  condition  codes: 


SVQMTY 

saved  I/O  queue  empty 

CANCEL 

read  terminated  by  a  CANCEL 

SNSOK 

sense  bytes  stored 

SNSBZY 

sense  command  rejected  because  of  busy  device 

SNSUC 

UC  on  sense  command 
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SVC  Calling  Sequences 


0) 

SVC 

JOBDMP 

11) 

LA 

1,  BUFFER 

SVC 

READ 

1) 

LA 

SVC 

0,  CTLST 

DMPLST 

ST 

0,  CHARCT 

BC 

CANCEL 

2) 

LA 

0,  LDN 

13) 

LA 

0,  LDN 

LA 

1,  CAW 

SVC 

SKIP 

LA 

2,  RTNLST 

(see  note**) 

SVC 

STIO 

16) 

LA 

0,  LDN 

3) 

LA 

0,  LDN 

LA 

2,  RTNLST 

SVC 

WAIT 

SVC 

SPWAIT 

(see 

note*) 

(see  note*) 

4) 

SVC 

DORMNT 

18) 

LA 

0,  LDN 

SVC 

SAVSKP 

5) 

LA 

0,  LDN 

(see  note**) 

SVC 

RESCNT 

ST 

0,  COUNT 

19) 

LA 

0,  LDN 

LA 

1,  SNSBUF 

6) 

SVC 

END 

SVC 

SNSADR 

(no  return) 

7) 

LA 

0,  LMESAG 

(after  UC) 

LA 

1,  MESAGE 

SVC 

WRITE 

CLI 

SNSBUF,  1 

BC 

8.SNSOK 

8) 

LA 

0,  LDN 

BC 

4,  SNSBZY 

SVC 

SAVE 

BC 

2,  SNSUC 

9) 

LA 

0,  LDN 

20) 

LA 

0,  LDN 

SVC 

RESTOR 

SVC 

GETID 

(see 

note**) 

ST 

0,  DEVID 

10)  LA  0,  LDN 
SVC  DELETE 
BC  8,  SVQMTY 


*  on  a  UE  or  UC  condition  after  a  STIO,  the  return  is  as  specified  in  the  returns  list 
of  the  associated  STIO  . 


**  return  is  to  the  SVC  WAIT  associated  with  the  top  entry  on  the  saved  I/O  queue. 
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IV- C.  Supervisor  Calls 


0 

JOBDMP 

1 

DMPLST 

2 

STIO 

3 

WAIT 

4 

DORMNT 

5 

RESCNT 

6 

END 

7 

WRITE 

8 

SAVE 

9 

RESTOR 

10 

DELETE 

11 

READ 

13 

DKIP 

16 

SPWAIT 

18 

SAVSKP 

19 

S  NS  ADR 

20 

GETID 
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Name:  JOBDMP  Supervisor  Call:  0 

Function: 


To  get  a  dynamic  dump,  for  debugging  purposes,  of  an  active  job  program 
together  with  its  buffers  and  the  supervisor  tables  which  contain  status  information 
of  the  job. 

Calling  Sequence:  None 

Return  Value:  None.  The  dump  is  output  on  printer  F  on  the  model  40,  and  the  single 
printer  on  the  model  65. 


Error  Exit: 


Up  to  10  dumps  may  be  stacked.  If  the  JOBDMP  SVC  is  called  while  10  dumps 
are  stacked,  a  supervisor  error  condition  occurs. 

Description: 

The  dump  produced  includes  the  JOBLIST,  JOBTABLES,  DEVICE  LIST,  DEVICE 
TABLES,  and  ENTRY  POOL,  the  CPUQ  and  the  first  4096  bytes  of  the  job  program  as 
well  as  each  buffer. 

The  first  page  of  the  dump  gives  the  low  core  system  registers,  first  128  (hex) 
bytes,  and  is  relevent,  primarily,  to  the  supervisor.  It  includes:  the  first  24  IPL 
locations:  interrupt  old  and  new  PSW's:  the  CSW,  CAW,  and  TIMER  registers;  and  the 
2  unused  words  of  low  core  before  and  after  the  TIMER  register.  The  register  after 
the  TIMER  register  contains  the  job  table  location  of  the  job  being  dumped.  In  addition, 
a  message  is  provided  indicating  the  job  name  associated  with  this  dump  and  the  error 
code  (RQST). 

The  second,  third,  fourth,  and  fifth  pages  give  the  complete  JOBLIST,  the  JOB 
TABLE,  the  DEVICE  LIST,  and  all  DEVICE  TABLES  as  used  by  the  supervisor.  Table 
formats  can  be  obtained  from  the  supervisor  listings.  Of  particular  interest,  the  Job 
Table  contains  the  Device  Table  Locations  of  the  devices  used,  the  initial  input  param¬ 
eters,  and  the  jobs  general  registers  as  they  were  at  the  time  of  the  supervisor  call. 
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Next  comes  the  entry  pool  containing  I/O  entries  and  CPUQ  entries,  followed  by 
the  CPUQ.  The  format  of  the  entries  can  be  obtained  from  the  supervisor  listings. 

The  first  CPUQ  entry  address  can  be  obtained  from  the  CPUQ.  The  first  word 
of  the  CPUQ  Entry  contains  the  second  half  of  the  task's  current  PSW.  The  address 
of  I/O  queue  entries  can  be  obtained  from  the  device  table  of  a  particular  device.  An 
I/O  Entry  contains  a  CAW  and  an  I/O  returns  list  location. 

The  first  4096  bytes  of  the  job  program  are  dumped  beginning  with  the  job  header 
in  half-word,  with  mnemonic  format.  The  storage  areas  used  by  the  job  program  are 
then  dumped  in  their  entirety. 


Note: 


Whenever  the  supervisor  recognizes  a  job  error,  an  automatic  job  dump  is  pro¬ 
vided  and  the  job  is  terminated.  The  type  of  error  can  be  determined  from  the  error 
code.  The  following  error  codes  can  occur: 


SVC 

PGNT 

CSW 

ILDN 


illegal  SVC  execution 
program  interruption 
channel  program  error 
illegal  logical  device  number  . 


When  a  program  interruption  error  occurs,  the  general  registers  at  the  time  of 
the  interruption  are  given  before  the  dump  of  the  job  program.  The  job  table  contains 
the  contents  of  the  genral  registers  as  of  the  last  previous  SVC  or  I/O  interruption  and 
the  CPUQ  holds  the  second-half  of  the  PSW  as  of  this  last  previous  interruption. 
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SVC  Dump  List 
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Name:  DMPLST  Supervisor  Call:  1 

Function: 


To  obtain  a  control  list  dump. 

Calling  Sequence: 

GR  0  -  Pointer  to  a  single  dump  control  list. 

Return  Value: 


None.  The  dump  is  output  on  Printer  F. 
Error  Exit: 


If  the  address  of  the  control  list  exceeds  the  addressable  memory  of  the  machine, 
the  job  is  terminated  with  the  error  code  SVC.  The  supervisor  permits  10  dump  re¬ 
quests  to  be  stacked,  and  if  a  dump  request  is  made  while  10  requests  are  stacked,  a 
supervisor  error  condition  occurs. 

An  improper  control  list  causes  an  error  comment  to  be  printed  and  the  request 
to  be  skipped. 

Description: 

The  control  list  specifies  the  type  of  dump  desired.  It  consists  of  8  control  bytes 
(double  word  aligned)  followed  by  an  optional  8-character  label.  (Refer  to  pp.  28-34, 
Form  C28-6505,  BPS  Basic  Utilities. )  Each  control  list  specifies  the  following 

a)  whether  or  not  there  is  a  dump  identification  label, 

b)  whether  the  End  Flag  field  specifies  an  end  address  +1 

location  or  a  count  of  bytes, 

c)  the  format  code  of  the  dump, 

d)  the  address  of  the  first  byte  of  the  area  to  be  listed, 

e)  the  length  in  bytes  of  each  item  (where  not  implied  by 

the  format), 

f)  the  size  of  the  area  as  defined  in  the  End/Count  field, 

g)  the  8 -byte  label. 


IV.  C.  1-1 


The  Control  List  Entry  format  is  shown  below: 


0  -  3 

4  -  7 

8  -  31 

32  -  39 

40  -  63 

64  -  127 

Label 

End 

Format 

Code 

First 

Address 

Length 

Last 

Address 

Label 

Flag  or  Count 

In  the  coding  of  a  Control  List  Entry  the  Label  Flag  and  End  Flag  are  specified  together 
in  one  hexadecimal  character  as  follows: 

Label/End  Flag:  , 

0  -  No  Label/ Count 

I  4  -  No  Label/Address 

\  8  -  Label/Count 

C  -  Label/Address 

\ 


Format  Codes: 


0 

1 

2 

3 

4 


6 

7 

8 
9 


Hexadecimal  with  length  specified  in  Length  field. 

Character  with  length  specified  in  Length  field. 

Packed  decimal  with  length  specified  in  Length  field. 

Zoned  decimal  character  with  length  specified  in  Length  field. 
Hexadecimal  half-word  with  mnemonics. 

Hexadecimal  full -words  without  mnemonics.  Length  of  each  item  is 
four  bytes. 

Short -precision  floating-point  decimal. 

Long-precision  floating-point  decimal. 

Same  as  4. 

Half-word  fixed -point  decimal. 

Full-word  fixed-point  decimal. 


Control  List  Entry 


DC 

X’fc 

f  =  Label/End  Flag,  c  =  Format  Code 

DC 

AL3  (aaaa) 

First  address  to  be  dumped 

DC 

ALl(nnn) 

Length  of  bytes  to  be  grouped  in  format  (0  to  255) 

DC 

AL3(bbbb) 

Last  address  +1  or  count  of  items 

DC 

CL8 ’label’ 

Dump  label. 

IV.  C.  1-2 


Lincoln  Laboratory  Multi-Programming  Supervisor 


Supervisor  Call  Description 
SVC  Start  I/O 
1  January  1967 


Name:  STIO  Supervisor  Call:  2 

Function: 

Adds  a  command  to  the  I/O  queue  for  a  specified  device  to  initiate  an  I/O 
operation. 

Calling  Sequence: 

GR  0  -  Logical  device  number  (1  -  5 ). 

GR  1  -  Address  of  an  I/O  channel  command. 

GR  2  -  Location  of  returns  list. 

The  returns  list  consists  of  3  full  words  aligned  at  a  word  boundary. 
The  first  word  is  storage  for  the  normal  return  after  an  SVC  WAIT,  the  second 
word  contains  the  return  address  for  a  unit  exception  condition,  and  the  third  word 
contains  the  return  address  for  a  unit  check  condition. 

Return  Value: 


None.  Return  is  to  the  instruction  following  the  SVC. 
Error  Exit: 


The  job  is  terminated  whenever  there  is  an  error  in  a  calling  sequence  parameter. 
An  illegal  logical  device  number  causes  the  job  to  terminate  with  the  code  ILDN.  If 
the  address  of  a  CCW  or  the  location  of  returns  list  exceeds  addressable  memory,  the 
job  terminates  with  the  code  SVC.  An  error  in  a  channel  command  will  cause  the  job 
to  terminate  with  the  code  CSW. 

Description: 

An  I/O  entry  is  added  to  the  I/O  queue  for  the  device  unit  indicated.  An  available 
entry  is  obtained  from  the  entry  pool  and  is  linked  to  the  active  I/O  queue.  The  last 
entry  address  is  set  in  the  device  table  and,  if  the  active  queue  was  empty,  the  first 
and  active  entry  address  is  set  to  point  to  the  new  I/O  entry.  The  supervisor  then  at¬ 
tempts  to  start  the  channel  command  program. 
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Note: 


Command  and  data  chaining  are  permitted  in  a  channel  program.  The 
incorrect  length  interrupt  is  ignored  and  not  passed  back  to  the  job  program. 
A  normal  return,  indicated  by  a  device  end  from  the  device,  or  a  unit  check 
or  unit  exception  condition,  results  in  an  appropriate  return  to  the  job. 
Attention  and  program -controlled  interrupts  cause  immediate  job  termination 
with  code  'CSW*. 
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Lincoln  Laboratory  Multi -Programming  Supervisor 


Supervisor  Call  Description 
SVC  Wait 
1  January  1967 


Name:  WAIT  Supervisor  Call:  3 

Function: 


Provides  interlock  to  wait  for  a  device  to  signal  the  completion  of 
an  I/O  operation. 


Calling  Sequence: 

GRO  -  Logical  device  number. 

Return  Value: 


CC  =  0 
CC  =  1 
CC  =  2 
CC  =  3 


non-immediate  operation 
initial  rejection  of  the  command 
unused 

immediate  operation. 


Each  SVC  WAIT  is  associated  with  an  SVC  STIO  which  added  an  I/O  request  to 
the  active  I/O  queue  in  the  Device  Table  of  the  device  indicated  by  the  logical  device 
number.  When  the  I/O  command  initiated  by  the  SVC  STIO  results  in  a  unit  exception 
(UE)  or  unit  check  (UC)  condition,  the  return  is  to  the  appropriate  address  indicated 
in  the  return  list  specified  by  the  associated  STIO.  Otherwise,  the  return  is  to  the 
instruction  following  the  SVC  WAIT. 


Error  Exit: 


The  job  is  terminated  with  an  error  code  ILDN  if  the  logical  device  number  is 
incorrect.  An  SVC  WAIT  not  preceded  by  an  associated  SVC  STIO  causes  the  job  to 
terminate  with  a  code  SVC. 
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Description: 


SVC  WAIT  permits  processing  to  continue  after  the  completion  of  an  I/O  operation. 
The  instruction  after  the  SVC  WAIT  is  taken  to  be  the  normal  return  and  its  address  is 

inserted  in  the  returns  list  specified  by  the  STIO  associated  with  the  SVC  WAIT.  The 
abnormal  returns  for  unit  exception  (UE)  and  unit  check  (UC)  are  specified  in  the 

returns  list.  For  each  STIO  supervisor  call,  there  must  be  a  corresponding  WAIT 
supervisor  call,  and  visa  versa. 

Upon  return  from  the  SVC  WAIT,  the  condition  code  will  have  been  set  to  indi¬ 
cate  if  the  command  was  initially  rejected  ( CC  =  1 )  or,  if  accepted,  whether  or  not 
it  was  an  immediate  operation.  A  condition  code  of  1  can  only  occur  with  an  abnormal 
return. 
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Lincoln  Laboratory  Multi -Programming  Supervisor 
Supervisor  Call  Description 
SVC  Dormant 
1  January  1967 

Name:  DORMNT  Supervisor  Call:  4 

Function:  Places  the  current  job  at  the  bottom  of  the  CPUQ. 

Calling  Sequence:  None 
Return  Value:  None 
Error  Exit:  None 
Description: 

The  current  job,  represented  by  the  given  entry  at  the  top  of  the  CPU  Q,  is 
placed  on  the  bottom  of  the  CPUQ.  This  call  permits  other  jobs  to  have  access  to 
the  central  processor. 
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Lincoln  Laboratory  Multi -Programming  Supervisor 


Supervisor  Call  Description 
SVC  Residual  Count 
1  January  1967 


Name:  RESCNT  Supervisor  Call:  5 

Function:  Obtains  the  residual  count  of  a  command  after  data  transmission. 
Calling  Sequence: 

GR  0  -  Logical  device  number 

Return  Value: 

GR  0  -  Residual  Count 

Error  Exit: 


An  illegal  logical  device  number  causes  the  job  to  terminate  with  a  code  of  ILDN. 
Description: 

On  the  receipt  of  a  Channel  End  interrupt,  the  residual  count  from  a  command  is 
stored  in  a  temporary  location  (RDVCNT)  in  the  device  table  of  the  interrupting  device. 

On  a  normal  device  end,  the  temporary  count  is  stored  in  the  CAW  part  of  the 
corresponding  I/O  queue  entry.  When  the  normal  return  is  added  to  the  CPU  queue,  the 
count  is  transferred  from  the  queue  entry  back  to  the  device  table,  stored  as  the  residual 
count  (in  location  RDVCNT),  and  may  be  obtained  from  a  job  program  as  the  residual 
count  from  the  previous  operations. 

On  a  unit  check  (UC)  or  unit  exception  (UE)  condition  the  temporary  residual  count 
is  stored  as  the  residual  count  (in  location  RDVCNT)  for  the  abnormal  condition.  The 
residual  count  may  then  be  obtained  from  a  job  program  by  a  call  to  RESCNT. 

This  procedure  of  storing  the  residual  count  in  temporary  locations  is  necessary 
since  more  than  one  operation  may  be  added  to  the  I/O  queue  of  one  device,  and,  for  each 
operation,  a  residual  count  must  be  saved.  The  residual  count  which  is  obtained  with  the 
supervisor  call  is  associated  with  the  last  I/O  operation  completed  on  the  device.  The 
residual  count  can  be  used  to  determine  the  number  of  bytes  that  were  actually  transmitted 
or  received  in  an  operation. 
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Lincoln  Laboratory  Multi -Programming  Supervisor 


Name:  END 

Supervisor  Call  Description 

SVC  End 

1  January  1967 

Supervisor  Call:  6 

Function:  Terminates  a  job. 

Calling  Sequence:  None 
Return  Value:  None 
Error  Exit:  None 
Description: 

The  job  is  terminated  and  all  its  devices  are  freed.  All  jobs  should  call 
END  after  its  function  has  been  completed. 
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Lincoln  Laboratory  Multi-Programming  Supervisor 


Supervisor  Call  Description 


SVC  Write 


1  January  1967 


Name:  WRITE 


Supervisor  Call:  7 


Function:  Writes  a  message  on  the  console  typewriter. 


Calling  Sequence: 


GR  0 
GR  1 


Number  of  characters  in  message. 
Location  of  first  character  in  message. 


Return  Value:  None.  Return  is  immediate. 

Error  Exit; 

The  job  terminates  with  the  code  SVC  if  the  address  of  the  last  character  of 
the  message  is  beyond  the  bounds  of  core  memory. 

Description: 

The  message  specified  in  the  calling  sequence  is  printed  on  the  console  type¬ 
writer  preceeded  by  the  job  number  and  the  job  name.  If  the  number  of  characters  in 
the  message  is  greater  than  100  characters,  the  last  97  characters  are  printed  followed 
by  the  characters  ' xxx'  to  indicate  that  the  line  has  been  truncated. 
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Lincoln  Laboratory  Multi-Programming  Supervisor 
Supervisor  Call  Description 
SVC  Save 
1  January  1967 


Name:  SAVE  Supervisor  Call:  8 

Function:  Transfers  Active  I/O  queue  to  top  of  Saved  I/O  queue. 
Calling  Sequence: 

GR  0  -  Logical  device  number 

Return  Value:  None 


Error  Exit: 


The  job  is  terminated  with  the  code  ILDN  if  the  logical  device  number  is  illegal, 
and  with  code  SVC  if  the  SVC  SAVE  is  issued  other  than  in  the  processing  of  a  unit 
exception  of  unit  check  condition  after  an  SVC  WAIT. 

Description: 

SVC  SAVE  stacks  the  Active  I/O  queue  onto  the  Saved  I/O  queue,  leaving  the 
Active  I/O  queue  empty.  With  the  Active  I/O  queue  cleared  a  new  I/O  operation  may 
be  issued  using  the  SVC  STIO,  or  the  SVC  SPWAIT  may  be  issued  to  wait  for  a  stray 
device  end  signal.  The  I/O  entry  (or  entries)  on  the  Saved  I/O  queue  must  eventually 
be  returned  to  the  Active  I/O  queue  or  deleted. 

An  entry  is  added  to  the  Active  I/O  queue  on  each  SVC  STIO  and  is  removed  from  the 
Active  I/O  queue  on  the  successful  (normal)  completion  of  the  operation.  When  an  abnormal 
condition  occurs,  the  abnormal  return  (UE  or  UC)  is  taken  but  the  I/O  entry  is  not  removed 
from  the  queue.  Subsequent  action  must  make  use  of  the  SVC  SAVE  followed  by  at  least 
one  of  the  following: 


a)  SVC  SKIP 

b)  SVC  DELETE 

c)  SVC  RESTOR 

An  SVC  SAVE  should  not  be  issued  while  a  device  is  busy.  That  is,  it  should  be 
issued  only  after  an  abnormal  return  from  an  SVC  WAIT. 
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Lincoln  Laboratory  Multi -Programming  Supervisor 
Supervisor  Call  Description 


SVC  Restore 
1  January  1967 


Name:  RESTOR  Supervisor  Call:  9 

Function:  Transfers  Saved  I/O  queue  to  bottom  of  Active  I/O  queue. 

Calling  Sequence: 

GR  0  -  Logical  device  number. 

Return  Value: 

None.  Return  is  to  the  SVC  WAIT  associated  with  the  top  entry  of  the  I/O  queue. 
Error  Exist: 


The  job  is  terminated  with  code  ILDN  if  the  logical  device  number  is  illegal  and 
with  code  SVC  if  the  resulting  Active  queue  is  empty. 

Description: 

SVC  RESTOR  chains  the  Saved  I/O  queue  to  the  bottom  of  the  Active  I/O  queue, 
leaving  the  Saved  I/O  queue  empty.  The  top  entry  on  the  I/O  queue  is  then  used  to  activate 
the  device.  The  job  is  then  put  in  WAIT  status  at  the  SVC  WAIT  associated  with  the  top 
entry  on  the  I/O  queue  waiting  for  the  completion  of  the  I/O  operation. 

This  supervisor  call  may  be  used  when  it  is  desired  to  redo  an  I/O  operation 
after  an  abnormal  condition.  It  should  not  be  called  if  the  resulting  Active  I/O  queue  would 
be  empty. 
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Lincoln  Laboratory  Multi -Programming  Supervisor 
Supervisor  Call  Description 


SVC  Delete 
1  January  1967 


Name:  DELETE  Supervisor  Call:  10 

Function: 


Removes  the  top  entry  on  the  Saved  I/O  queue. 
Calling  Sequence: 

GR  0  -  Logical  device  number. 

Return  Value: 


CC  =  0  Saved  I/O  queue  empty. 

CC  =  1  Saved  I/O  queue  not  empty. 


Error  Exit: 

The  job  is  terminated  with  the  code  ILDN  if  the  logical  device  number  is  illegal. 
Description: 

SVC  DELETE  removes  the  top  entry  on  the  Saved  I/O  queue  and  sets  the  condi¬ 
tion  code  to  zero  if  the  Saved  queue  is  empty,  and  to  one  otherwise.  If  it  is  desired 
to  delete  the  complete  Saved  queue,  this  Supervisor  Call  must  be  issued  repeatedly 
until  the  queue  is  empty. 

If  the  queue  is  already  empty,  the  supervisor  call  is  ignored. 
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Lincoln  Laboratory  Multi -Programming  Supervisor 


Supervisor  Call  Description 
SVC  Read 
1  January  1967 


Name:  READ  Supervisor  Call:  1 1 

Function:  Reads  an  operator  message. 

Calling  Sequence: 

GR  1  -  Buffer  location  for  message. 

Return  Value: 

GR  0  -  Number  of  characters  read. 

COO  -  Message  was  terminated  by  CANCEL. 

CC=1  -  Message  received. 


Error  Exits: 


The  job  is  terminated  with  code  SVC  if  the  buffer  location  is  within  100  locations 
of  the  end  of  core. 

Description: 

The  job  number,  job  name,  and  three  dots  (...)  are  printed  on  the  typewriter. 
The  proceed  light  is  then  turned  on  permitting  an  operator  message  to  be  typed.  The 
message  may  be  terminated  by  either  a  carrier  return  (CR),  End  of  Block  (EOB),  or 
CANCEL  signal.  The  message  is  automatically  terminated  on  receipt  of  the  100th 
character.  The  number  of  characters  read  is  returned  in  GRO.  If  the  message  was 
terminated  by  a  CANCEL  signal,  the  condition  code  is  set  to  0,  otherwise  it  is  set  to  1. 
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Lincoln  Laboratory  Multi -Programming  Supervisor 


Supervisor  Call  Description 
SVC  Skip 
1  January  1967 


Name:  SKIP  Supervisor  Call:  13 

Function:  Forces  a  normal  return  from  an  I/O  entry  on  the  Saved  I/O  queue. 
Calling  Sequence: 

GR  0  -  Logical  device  number 

Return  Value: 


None.  Return  is  to  the  instruction  after  the  SVC  WAIT  (the  normal  return) 
associated  with  the  top  entry  of  the  Saved  I/O  queue. 

Error  Exit: 


The  job  is  terminated  with  code  ILDN  if  the  logical  device  number  is  illegal, 
or  with  code  SVC  if  the  Saved  I/O  queue  is  empty. 

Description: 

The  supervisor  call  SKIP  is  used  to  accept  an  abnormal  condition  and  to  return  to  the 
normal  return  associated  with  the  operation.  It  is  to  be  issued  only  when  there  is  an  entry 
on  the  Saved  I/O  queue.  The  Saved  I/O  queue  is  added  to  the  bottom  of  the  Active  I/O  queue, 
clearing  the  Saved  I/O  queue,  and  the  top  entry  in  the  I/O  queue  is  then  removed  and  its 
normal  return  added  to  the  CPU  queue. 
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Lincoln  Laboratory  Multi-Programming  Supervisor 
Supervisor  Call  Description 
SVC  Special  Wait 
1  January  1967 


Name:  SPWAIT  Supervisor  Call:  16 

Function:  To  wait  for  a  device  end  signal  for  a  device. 

Calling  Sequence: 

GR  0  -  Logical  device  number. 

GR  2  -  Location  of  returns  list. 

The  returns  list,  like  that  used  with  the  SVC  STIO,  consists  of  3  full  words 
aligned  at  a  word  boundary.  The  first  word  is  storage  for  the  normal  return,  the 
second  word  contains  the  return  address  for  a  unit  exception  condition,  and  the  third 
word  contains  the  return  address  for  a  unit  check  condition. 

Return  Value: 


When  a  stray  device  end  comes  from  the  specified  device,  return  is  as  indicated 
in  the  returns  list.  The  normal  return  is  to  the  instruction  following  the  SVC  SPWAIT. 

Error  Exit: 


The  job  is  terminated  whenever  there  is  an  error  in  a  calling  sequence  parameter 
or  if  the  SVC  SPWAIT  is  issued  with  a  non-empty  I/O  queue. 

Description: 

SVC  SPWAIT  is  used  to  provide  an  interlock  to  wait  on  a  stray  device  end  signal. 

A  stray  device  end  signal  is  generated  whenever  the  device  goes  from  a  not  ready  to  a 
ready  state.  Thus,  this  supervisor  call  can  be  used  to  wait  for  a  not  ready  device  to  be¬ 
come  ready. 

This  supervisor  call  is  like  the  supervisor  call  SVC  STIO  for  no  operation,  followed 
by  the  SVC  WAIT  to  wait  for  the  device  end  signalling  the  completion  of  the  operation,  i.  e.  , 
the  device  is  ready.  No  I/O  operation  can  be  in  progress  when  this  supervisor  call  is  issued 
otherwise  an  SVC  error  exit  will  be  taken. 
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Lincoln  Laboratory  Multi -Programming  Supervisor 


Supervisor  Call  Description 
SVC  Save -Skip 
1  January  1967 


Name:  SAVSKP 


Supervisor  Call:  18 


Function:  Forces  a  normal  return  after  an  abnormal  condition. 


Calling  Sequence: 


GR  0  -  Logical  device  number. 


Return  Value: 


None.  Return  is  to  the  instruction  after  the  SVC  WAIT  (the  normal  return) 
associated  with  the  top  entry  of  the  Active  I/O  queue. 

Error  Exit: 


The  job  is  terminated  with  code  ILDN  if  the  logical  device  number  is  illegal,  or 
with  code  SVC  if  the  call  is  issued  other  than  in  the  processing  of  a  unit  exception  or  unit 
check  condition  after  an  SVC  WAIT. 

Description: 

This  supervisor  call  is  a  combination  of  SVC  SAVE  followed  by  SVC  SKIP.  It 
may  be  used  when  it  is  desired  to  accept  an  abnormal  condition  and  take  the  normal 
return  from  an  I/O  operation. 

The  Active  I/O  queue  is  stacked  onto  the  Saved  I/O  queue,  leaving  the  Active  I/O 
queue  empty,  and  then  the  Saved  I/O  queue  is  transfered  to  the  Active  I/O  queue,  leaving 
the  Saved  I/O  queue  empty.  The  top  entry  in  the  I/O  is  then  removed  and  its  normal  return 
is  added  to  the  CPU  queue. 
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Lincoln  Laboratory  Multi- Programming  Supervisor 


Supervisor  Call  Description 
SVC  Sense  Address 
1  January  1967 


Name:  SNSADR  Supervisor  Call:  19 

Function:  Controls  automatic  sense  on  unit  check. 

Calling  Sequence: 

GR  0  -  Logical  device  number. 

GR  1  -  Pointer  to  sense  area;  this  value  is  zero 
if  no  automatic  sensing  is  desired. 

Return  Value: 

None.  The  contents  of  the  general  registers  and  the  value  of  the  condition  code 
remain  unchanged.  The  first  byte  of  the  sense  area  is  set  to  zero  if  GR  1  did  not 
contain  a  zero. 

Error  Exit: 


The  job  is  terminated  if  the  logical  device  number  is  incorrect,  in  which  case  the 
code  ILDN  is  displayed.  If  the  sense  area  address  exceeds  the  addressable  memory 
of  the  machine,  the  job  is  terminated  with  the  error  code  SVC. 

Description: 

The  address  in  GR  1  is  stored  in  the  device  table  and  the  automatic -sense  flag  is 
set  in  the  device  table.  If  a  unit  check  indication  is  received  from  this  device,  the 
supervisor  issues  a  sense  command  to  the  device,  using  the  sense  area  address.  If 
the  sense  command  is  successful,  the  sense  information  is  stored  starting  at  the  second 
byte  of  the  sense  area.  The  first  byte  is  used  as  a  flag  to  indicate  the  results  of  the 
sense  command,  and  is  set  as  follows: 
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0  -  Sense  command  was  rejected  because  the  device 
was  still  busy  from  a  previous  operation. 

1  -  The  sense  command  was  successfully  completed. 

2  -  Unit  check  was  received  while  issuing  the  sense 

command;  three  attempts  were  made. 


Note  that  a  flag  setting  of  0  cannot  usually  occur  with  tape  units;  it  might  occur  in 
operations  for  which  channel  end  and  device  end  are  separate  interrupts,  and  where 
unit  check  can  appear  with  channel  end. 

Up  to  six  bytes  of  sense  information  are  transferred,  the  actual  number  being  deter¬ 
mined  by  the  device  type. 

Note  that  this  supervisor  call  needs  to  be  issued  only  once  in  the  running  of  a  task 
if  the  automatic  sense  feature  is  always  desired. 
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Lincoln  Laboratory  Multi -Programming  Supervisor 


Supervisor  Call  Description 
SVC  Get  ID 
1  January  1967 


Name:  GETID  Supervisor  Call:  20 

Function:  Obtains  device  identification. 

Calling  Sequence: 

GR  0  -  Logical  device  number. 

Return  Value: 


GR  0  -  Four  character  device  identification;  four  hyphens  ( - )  are  returned 

for  devices  having  only  one  of  a  type.  All  other  general  registers  and  the  value  of 
the  condition  code  remain  unchanged. 

Error  Exit 


The  job  is  terminated  with  the  error  code  ILDN  if  the  logical  device  number 
is  incorrect. 

Description: 

The  four  character  device  identification  as  typed  in  by  the  operator  is  returned 
in  GR  0.  It  may  then  be  placed  in  a  message  to  be  displayed  to  the  operator  to  help 
him  identify  the  unit. 
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Lincoln  Laboratory  Multi -Programming  Supervisor 
5  April  1966 

IV -D.  Job  Program  Subroutines  (Unit  Check  Routines) 

The  system  subroutines  are  for  use  by  jobs  operating  under  the 
Lincoln  Laboratory  Multi -Programming  Supervisor.  These  routines 
are  re-entrant  and  can  thus  be  called  by  any  number  of  jobs. 

The  routines  described  are: 

1.  Tape  Utilities 

ERG,  WTM,  FSR,  BSR,  FSF,  BSF,  REW,  RVN 

2.  Card  Reader  Unit  Check 
CDRDUC,  CDSTUC 

3.  Tape  Unit  Check 
TPWRUC,  TPRDUC 

4.  Printer  Unit  Exception  and  Unit  Check 
PRTUE,  PRTUC 

5.  Find  Job  List 
FJBLST 
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Lincoln  Laboratory  Multi -Programming  Supervisor 
Subroutine  Write-up 
Tape  Utilities  (Re-Entrant) 

21  March  1966 


General  Information: 

The  subroutines  described  here  provide  a  means  for  spacing  tape  forward  or  back¬ 
ward,  (by  records  or  files)  erasing  tape  in  units  of  inter-record  gaps,  or  writing  on  tape 
a  number  of  tape  marks.  The  subroutines  are  re-entrant  and  are  written  to  operate  on 
7-  or  9 -track  tape  units. 

Subroutine  Entries: 

To  call  a  tape  utility  subroutine,  the  entry  point  must  be  defined  or  an  EXTRN 
in  the  job  program  and  an  address  constant  must  be  defined  for  the  entry  address.  A 
routine  is  called  by  loading  the  entry  point  address  into  general  register  15  and  issuing  a 
BALR  14,  15  instruction.  The  return  address  will  be  stored  in  general  register  14  to 
permit  the  routine  to  return  to  the  next  instruction.  The  tape  utility  subroutines,  their 
functions,  and  entry  names  are  indicated  below. 


Name 

Entry 

Function 

Erase  Record  Gap 

ERG 

Erase  tape  for  length  of  one  or  more  inter -record 
gaps  (3-1/2") 

Write  Tape  Mark 

WTM 

Write  one  or  more  tape  marks 

Forward  Space  Record 

FSR 

Forward  space  a  tape  one  or  more  records 

Backspace  Record 

BSR 

Backspace  a  tape  one  or  more  records 

Forward  Space  File 

ESF 

Forward  space  a  tape  one  or  more  files 

Backspace  File 

BSF 

Backspace  a  tape  one  or  more  files 

Rewind  Tape 

REW 

Rewind  tape  to  load  point 

Rewind  and  Unload 

RUN 

Rewind  and  unload  tape 

General  Register  Settings  on  Input: 

Table  IV.  D.  1-1  gives  the  general  register  settings  required  for  each  subroutine 
where  the  general  registers  applicable  for  each  subroutine  are  indicated  by  an  x  in  the 
Table. 

Hie  save  areas  pointed  to  in  GR  4  and  GR  13  must  be  double  word  aligned.  The 
sense  bytes  for  the  tape  unit  are  stored  in  the  first  5  bytes  of  the  sense  save  area  (GR  4) 
and  the  CCW  is  stored  in  the  second  double  word  of  this  area. 
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Revised1  1  April  1967 

Table  IV.  D.  1-1.  General  Register  Settings 


General  Registers  Subroutines 

ERG  WTM  FSR  BSR  FSF  BSF  REW  RUN 


0  -  Logical  Device  Number 

X 

X 

X 

X 

X 

X 

X 

X 

4  -  Pointer  to  16  byte  save  area  for  sense 
bytes  and  CCW 

X 

X 

X 

X 

X 

X 

X 

X 

10  -  Density  code:  0  for  200  bpi,  1  for 

556  bpi,  2  for  800  bpi 

X 

X 

X 

X 

X 

12  -  Number  of  records  or  files  to  be 

spaced,  tape  marks  to  be  written, 
or  inter- re  cord  gaps  to  be  erased 

X 

X 

X 

X 

X 

X 

13  -  Pointer  to  64  byte  general  register 
save  area 

X 

X 

X 

X 

X 

X 

X 

X 

14  -  Return  from  subroutine 

X 

X 

X 

X 

X 

X 

X 

X 

15  -  Branch  to  subroutine 

X 

X 

X 

X 

X 

X 

X 

X 

Default  Conditions; 

1.  If  density  code  is  not  0,  1,  or  2,  then  a  code  of  2  (for  800  bpi)  is  selected  automatically. 

2.  The  operation  on  a  9-track  unit  forces  a  density  of  800  bpi  regardless  of  the  density 
setting. 

3.  If  the  count  in  GR  12  is  less  than  or  equal  to  0,  a  count  of  1  is  used. 

Function  Returns: 


The  subroutines  return  with  the  condition  code  set  as  indicated  in  Table  IV.  D.  1-2  and  the 
sense  bytes  from  the  last  executed  operation  stored  in  the  first  five  bytes  of  the  sense  save  area 
pointed  to  in  GR  4.  Upon  returning  from  a  subroutine,  all  GR*s  except  GR  12  will  contain  their 
original  settings.  GR  12  will  contain  the  count  remaining  on  termination  of  the  executed  routine. 
The  condition  codes  applicable  for  each  subroutine  are  indicated  by  an  x  in  the  Table.  On  returns 
with  condition  code  3  the  calling  routine  can  check  for  file  protect  status  by  testing  sense  byte  2 
bit  6  and  for  a  not  ready  condition  during  operation  by  testing  sense  byte  5  bit  1.  The  bits  are 
numbered  0-7  (from  left  to  right). 

Table  IV.  D.  1-2.  Condition  Code  Settings 
Condition  Code  Subroutines 


ERG  WTM  FSR  BSR  FSF  BSF  REW  RUN 


0  Operation  Successful 

X 

X 

X 

X 

X 

X 

X 

X 

1  Tape  mark  encountered  (End  of  File) 

X 

X 

2  Tape  marker  encountered  (End  of  Tape) 

X 

X 

X 

X 

2  Load  point  marker  encountered 

X 

X 

3  Equipment  check  or  unit  made  not  ready 
during  operation 

X 

X 

X 

X 

X 

X 

X 

X 

3  Unit  in  file  protect  status 

X 

X 
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Lincoln  Laboratory  Multi -Programming  Supervisor 
Subroutine  Write-up 

Reader  Unit  Check  and  Punch  Unit  Check- Unit  Exception  Routines 

1  April  1967 


General  Information: 

The  card  unit  check  and  punch  unit  exception  routine  are  described  in  three 
sections: 


a)  Operating  instructions  describing  the  messages 
produced  by  the  routines  and  the  required  operator 
actions, 

b)  Programming  instructions  describing  how  to  use 
the  routines  in  writing  job  programs,  and 

c)  Program  descriptions  consisting  of  a  flow  chart 
of  the  card  routines  and  explanatory  notes. 

Operating  Instructions: 

Messages  come  in  two  forms,  depending  on  the  number  of  card  readers  or  punches 
attached  to  the  system.  If  only  one  reader  or  punch  is  attached,  the  message  appears  by 
itself.  If  more  than  one  reader  or  punch  is  attached,  the  message  is  preceded  by  the  words 
"READER  RDRn"  or  "PUNCH  PCHn"  to  identify  which  reader  or  punch  is  being  referred  to. 

Two  types  of  messages  can  be  written  by  the  routines.  The  first  type,  which 
requires  operator  action,  is  always  associated  with  a  stopped  reader  or  punch  and 
indicates  that  the  card  reader  or  punch  is  not  ready,  that  a  read  or  punch  check  has 
occurred,  or  that  an  invalid  card  code  has  been  read.  The  second  type,  which  requires 
that  the  operator  notify  either  the  IBM  customer  engineer  or  the  responsible  system 
programmer,  always  contains  the  word  "ERROR"  and  causes  the  task  to  be  terminated. 

Descriptions  of  the  messages  follow: 

I.  Operator  Action  Messages 

1.  READER  (or  PUNCH)  NOT  READY 

This  message  indicates  that  the  ready  light  on  the  reader  (or  punch)  is  not  on. 

If  no  error  lights  are  lit,  insert  cards  in  the  hopper  and  press  "start".  If 
the  stacker  light  is  on,  clear  the  full  stacker  and  press  "start".  If  the  Chips 
box  light  is  on,  empty  or  replace  the  punch  chip  box,  whichever  is  the  case, 
and  press  "start".  If  the  Feed  Stop  light  on  the  reader  is  lit,  clear  the  card 
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jam.  Any  cards  that  have  passed  the  prestacker  station  on  the  reader  should 
then  be  stacked;  all  other  cards  should  be  placed  back  in  the  read  hopper,  and 
the  "start"  key  pressed.  On  the  punch,  it  is  impossible  to  recover  from  a 
card  jam.  Therefore,  the  task  should  be  terminated  and  the  job  restarted  from 
the  beginning. 

2.  READ  CHECK.  RE-FEED  THE  CARD. 

(Reader  only) 

This  message  indicates  that  the  card  at  the  reader  pre -stacker  station  has 
caused  a  hole  count  check.  The  Read  Check  light  will  have  been  turned  on. 

Stop  the  reader,  perform  a  non-process  run-out,  and  examine  the  card  for 
misaligned  punches.  If  the  card  appears  to  be  all  right,  place  it  and  all 
following  cards  in  the  read  hopper  and  press  "start".  If  the  error  persists, 
notify  the  customer  engineer. 

3.  INVALID  EBCDIC  CHARACTER.  CORRECT  AND  RE-FEED  THE  CARD 
(Reader  Only) 

The  message  indicates  that  the  card  at  the  pre -stacker  station  contains  an 
invalid  EBCDIC  code.  The  validity  check  light  will  have  been  turned  on. 

Perform  a  non-process  run-out  and  examine  the  first  card.  An  invalid  code 
is  generated  whenever  any  column  contains  more  than  one  punch  in  rows  1  to  7. 

If  the  card  can  be  corrected,  do  so  (and  notify  the  owner);  if  it  cannot  be  corrected, 
but  can  be  ignored  (such  as  a  flip  card  encountered  during  PRESTORE),  place  it 
in  the  stacker  or  discard  it.  In  either  case,  place  the  run-out  cards  in  the  read 
hopper  and  press  "start".  If  the  card  cannot  be  corrected  or  ignored,  terminate 
the  task. 

II.  Permanent  Error  Messages 

There  are  three  permanent  error  messages,  and  all  three  cause  the  task  to  be 
terminated.  The  status  information,  which  consists  of  four  bytes  of  hexadecimal  infor¬ 
mation  from  the  unit  check  routines,  is  displayed  for  two  of  the  messages  (see  Program¬ 
ming  Instructions).  The  meaning  of  the  bytes  are  as  follows: 


hf 

mf 

sf 

sb 


HIS  F  LG 

MYFLAG 

SNSFLG 


SENSE  (card  reader  or  punch  sense  byte). 


4.  MACHINE  ERROR  CARD  READER  (or  PUNCH)  STATUS  hfmf  sfsb 

If  this  message  is  printed  on  the  console  typewriter,  the  customer  engineer 
should  be  notified. 
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5.  PROGRAM  ERROR  CARD  READER  (or  PUNCH)  STATUS  hfmf  sfsb 


If  this  message  is  printed  on  the  console  typewriter,  the  responsible  system 
programmer  should  be  notified. 

6.  MACHINE  ERROR  --  PUNCH  UNIT  EXCEPTION 

A  punch  unit  exception  is  not  recognized  as  a  legal  status  condition  since  the 
PFR  (Punch  Feed,  Read)  feature  is  not  installed  on  the  Lincoln  Laboratory  2540 
card  units.  If  this  message  appears,  the  customer  engineer  should  be  notified. 

Programming  Instructions: 

The  punch  unit  check  and  unit  exception  routines  only  handle  unit  check  and  unit 
exception  conditions  for  the  punch,  feed,  select  stacker  command.  It  does  not  handle 
reliably  unit  checks  and  unit  exceptions  arising  from  the  use  of  the  PFR  write  command. 

The  reader  unit  check  routine  handles  card  reader  unit  checks  for  two  types  of  commands: 

1.  Read  with  no  feed  (entry  point  CDRDUC) 

2.  Feed  and  select  stacker  (entry  point  CDSTUC) 

Linkage  from  the  calling  program  requires  placing  the  proper  entry  point  address 
(CDSTUC,  CDRDUC,  CDPNUC  or  CDPNUE),  which  has  been  defined  as  an  EXTRN  in  the 
calling  program,  into  the  returns  list  as  the  unit  check  or  unit  exception  return  address. 
The  calling  program  must  also  initialize  general  register  13  to  point  to  a  double-word 
aligned  storage  area,  DSECT1,  depicted  in  Figure  IV.  D.  2-1.  The  first  word  in  DSECT1  must 
point  to  a  second  double-word  aligned  storage  area,  DSECT2,  also  shown  in  Figure  1. 
DSECTl  is  used  as  a  work  area  by  the  routines  and  must  be  100  bytes  long.  DSECT2 
contains  parameters  used  by  the  routines  and  is  12  bytes  long  for  CDPNUE,  CDRDUC  or 
CDSTUC  and  16  bytes  long  for  CDPNUC. 

If  any  of  the  unit  check  return  options  are  selected,  the  calling  program  must 
place  the  assembled  instruction  "BC  15,RTNADR"  into  the  first  word  of  DSECT2. 

RTNADR  is  the  location  in  the  calling  program  to  which  control  will  be  returned  with 
the  condition  code  set  to  3  when  a  data  check  (validity  check  from  the  reader)  occurs, 
and  with  the  condition  code  set  to  0  when  an  equipment  check  occurs.  This  full  word  in 
DSECT2  must  be  reserved  even  if  the  calling  program  does  not  use  the  options. 

The  second  word  contains  four  bytes  of  hexadecimal  information.  The  HISFLG 
byte  contains  information  to  be  passed  from  the  calling  program  to  the  routine.  The 
MYFLAG  byte  must  be  cleared  by  the  calling  program,  and  is  used  by  the  unit  check 
routine.  The  SNSFLG  and  SENSE  bytes  are  used  by  the  supervisor  to  provide  sense 
information  to  the  unit  check  routine.  The  fourth  word  in  DSECT2  is  the  address  of 
the  CCW  to  be  used  by  the  CDPNUC  routine  in  repunching  a  card  upon  sensing  a  hole 
count  error.  When  a  hole  count  error  occurs,  it  refers  not  to  the  card  just  punched 
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GR13  contains  the  address  DSECT1 


4  bytes 


DSECT1 


25  words 


DSECT2 


4  bytes’ 


BC  15,  RTNADR 


HISFLG 


MYFLAG 


SNSFLG 


SENSE 


DEVICE  ID 


PUNCH  CCW  ADDRESS 


4  words 


Figure  IV.  D.  2-1.  DSECTs  used  in  unit  check/unit  exception  routines. 
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but  to  the  card  punched  from  the  previous  write  command.  Thus,  after  every  SVC  WAIT 
associated  with  each  punch  STTO  the  programmer  must  save  the  CCW  just  used  and  the 
data  just  punched.  The  address  of  the  saved  CCW  is  placed  in  the  fourth  word  of  DSECT2. 

Note  that  when  a  hole  count  error  is  detected,  the  card  punch  unit  check  routine 
tries  to  repunch  the  card  in  error.  If  the  error  still  persists  after  ten  retries  a  machine 
error  message  as  described  above  is  typed  on  the  console  typewriter.  This  error 
recovery  procedure  assumes  that  the  engineering  level  of  the  punch  is  such  that  the 
card  following  the  one  in  error  is  automatically  directed  to  stacker  1  after  a  hole  count 
error. 


The  location  of  the  SNSFLG  byte  must  be  passed  to  the  supervisor  via  an  SVC 
SNSADR  to  initiate  automatic  sensing  prior  to  issuing  the  first  SVC  STIO  for  the  card 
reader  or  punch.  SVC  GETID  must  also  be  issued,  and  the  device  ID  obtained  placed 
in  the  third  word  of  DSECT2.  The  MYFLAG  byte  must  be  cleared  prior  to  each  SVC 
WAIT  issued  for  the  card  reader  or  punch.  The  HISFLG  byte  is  used  to  select  the  unit 
check  routine  options  and  to  indicate  the  type  of  command  being  performed.  The  contents 
of  the  HISFLG  byte  are  not  altered  by  the  routines.  For  the  punch  unit  exception  routine, 
the  user  need  supply  on  the  device  ID  field  (word  three)  of  DSECT2. 

The  meaning  of  the  bits  in  the  HISFLG  byte  (numbered  0-7  from  left  to  right)  are 
as  follows: 

Bit  0  and  1  -  Unused.  Must  be  set  to  zero. 

Bit  2  -  PNlBIT  -  This  bit  must  be  set  when  and  only  when  the  first  punch 
command  is  given.  It  must  be  cleared  for  subsequent  punch  commands. 

Bit  3  -  DMSBIT  -  This  bit  should  be  set  if  a  return  on  a  validity  check  is 
desired.  When  a  validity  check  occurs,  the  unit  check  routine  types 
message  3  and  then  issues  an  SVC  SPECWT. 

Bit  4  -  DA  TBIT  -  This  bit  should  be  set  if  a  return  on  a  reader  validity 
check  is  desired  without  message  3  being  typed.  Condition  code  3  is  set 
following  the  validity  check.  This  bit  overrides  the  DMSBIT. 

Bit  5  -  USLBIT  -  This  bit  must  be  set  whenever  an  unusual  command 
sequence  is  to  be  issued  (i.  e. ,  when  a  read  command  is  issued  following 
a  read,  no-feed  command  without  a  stack  command  between  the  read 
commands). 

Bit  6  -  BINBIT  -  This  bit  must  be  set  whenever  a  column-binary  read 
command  (Data  Mode  2)  is  to  be  issued  to  the  card  reader. 

Bit  7  -  EQPBIT  -  This  bit  should  be  set  if  a  return  on  equipment  check  is 
desired.  When  the  equipment  check  occurs,  the  unit  check  routine  will 
return  to  RTNADR  with  the  condition  code  set  to  0. 
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The  meaning  of  the  bits  in  the  MYFLAG  byte  (numbered  0-7  from  left  to  right) 
are  as  follows: 

Bit  0  -  REPUN  -  This  bit  is  set  by  the  CDPNUC  routine  if  a  unit  check 
occurs  on  the  punch  command  issued  by  the  routine  while  attempting 
to  repunch  a  card. 

Bit  1  -  PUNBIT  -  This  bit  is  set  when  the  user  enters  the  card  unit  check 
routine  via  the  CDPNUC  entry  point. 

Bit  2  -  UCDBIT  -  This  bit  is  set  by  the  CDSTUC  routine  when  a  unit  check 
occurs  on  the  dummy  read,  no-feed  command  issued  by  the  routine.  (See 
Section  Program  Description,  lb,  on  page  IV.  D.  2-10. ) 

Bit  3  -  DUMBIT  or  PASS1  -  This  bit  is  set  by  the  CDSTUC  routine  before 
issuing  a  dummy  read,  no-feed  command.  Or,  it  may  be  set  by  the 
CDPNUC  routine  when  the  maximum  repunch  count  is  initialized  on  a  hole 
count  error  indication. 

Bit  4  -  BUSBIT  -  This  bit  is  set  by  the  card  unit  check  routine  when  a 
bus -out  check  has  occurred. 

Bit  5  -  INIBIT  -  This  bit  is  set  by  the  card  unit  check  routine  when  a 
command  was  rejected  on  initial  selection. 

Bit  6  -  REDBIT  -  This  bit  is  set  when  the  card  unit  check  routine  was 
entered  via  the  CDRDUC  entry  point. 

Bit  7  -  STKBIT  -  This  bit  is  set  when  the  card  unit  check  routine  was 
entered  via  the  CDSTUC  entry  point. 

SENFLG  is  a  code  which  indicates  whether  or  not  the  LLMPS  supervisor  was 
successful  in  obtaining  sense  information  on  automatic  sensing.  The  codes  and  their 
meanings  are: 

00  -  The  sense  command  on  automatic  sensing  was  rejected  because 
the  device  was  still  busy  from  a  previous  operation.  For  the  reader 
or  punch,  this  code  indicates  machine  error. 

01  -  The  sense  command  was  successfully  completed. 

02  -  Unit  check  was  received  while  issuing  the  sense  command; 
three  attempts  were  made.  Persistent  unit  check  condition  on 
sensing  indicates  machine  error. 
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Sample  Programs: 


An  example  of  the  use  of  the  Card  Reader  unit  check  routine  in  a  program  which 
reads  cards  in  binary  mode,  determines  whether  the  card  should  he  read  again  in  BCD 
mode,  and  then  stacks  the  card  as  shown  below: 


EXAMPL1 

START 

0 

EXTRN 

CDRDUC 

EXTRN 

CDSTUC 

LA 

0,  LDN 

Put  logical  device  number  of  the  reader 

LA 

1,  SNSFLG 

Set  up  automatic  sensing 

SVC 

S  NS  ADR 

SVC 

GETTD 

Get  the  device  ID 

ST 

0,  DEVID 

LS 

13,DSECT1 

BINCRD 

LM 

0,2, RDBIN 

Read  card  in  binary  mode 

SVC 

STIO 

MV  I 

HISFLG,2 

Set  BINBIT 

MV  I 

MYFLAG,0 

Clear  MYFLAG 

SVC 

WAIT 

CLI 

BUFF+1,5 

Test  for  7  and  9  punch  in  column  1 

BC 

7, BCDCRD 

BCDCRD 

LM 

0,2,RDBCD 

Read  card  in  BCD  mode 

SVC 

STIO 

MV  I 

MYFLAG,0 

Clear  MYFLAG 

MV  I 

HISFLG,20 

Set  DMSBIT  and  USLBIT 

SVC 

WAIT 

STACK 

LM 

0,2,  STACKE 

SVC 

STIO 

SC 

HIS F LG (2),  HISFLG  Clear  HIS F LG  and  MYFLAG 

SVC 

WAIT 

RTNADR 

BC 

14,EQPERR 

Special  processing  for  validity  check 

LA 

0,1 

SVC 

DELETE 

RDBIN 

DC 

F’i* 

DC 

ApRDCCW) 

DC 

A(RDRTN) 
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RDBCD 

DC 

F'l' 

DC 

A(BRDCCW) 

DC 

A  (RDRTN) 

STACKE 

DC 

F'l' 

DC 

A(STKCCW) 

DC 

A  (STKRTN) 

RDRTN 

DS 

F 

DC 

A(UEXRTN) 

DC 

A(CDRDUC) 

STKRTN 

DS 

F 

DC 

A(UEXRTN) 

DC 

A(CDSTUC) 

DS 

OD 

DSECT1 

DC 

A(DSECT2) 

DS 

24F 

DS 

OD 

DSECT2 

BC 

15,  RTNADR 

HIS  F  LG 

DS 

C 

MYFLAG 

DS 

C 

SNSFLG 

DS 

C 

SENSE 

DS 

C 

DEVID 

DS 

F 

An  example  of  the 

use  of  the  Card 

in  a  program  that  reads  variable  unblocked  tape  records  and  punches  EBCDIC  cards  is 
shown  below: 


EXAMPL2 

START 

0 

EXTRN 

CDPNUC 

EXTRN 

CDPNUE 

LA 

0,  LDN 

Put  logical  device  number  of  punch  in  GRO 

LA 

1,  SNSFLG 

Set  up  automatic  sensing 

SVC 

S  NS  ADR 

SVC 

GETID 

Get  DEVID  ID 

ST 

0,  DEVID 

LA 

13,  DSECT1 

MV  I 

HISFLG,  X'20' 

Set  flag  for  1st  punch  command 

READTP 

•  •  • 

•  •  • 

Read  record, 

•  •  • 

.  .  • 

get  physical  record  length, 

•  •  • 

•  ■  • 

and  store  in  GR6 
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Setup  punch  CCW 
Punch  EBCDIC  card 

Clear  MYFLAG 

Clear  initial  X'20'  in  I1ISFLG 
Construct  SAVCCW 

Move  punched  data  to  save  area 


PUNLST 

DC 

F'l* 

DC 

A  (PUNCCW) 

DC 

A  (PUNRET) 

PUNRET 

DS 

F 

DC 

A(CDPNUE) 

DC 

A(CDPNUC) 

PUNCCW 

CCW 

X'81',  BUFFER,  0,  1 

SAVCCW 

CCW 

X’81’,  SAVPUN,  0,  1 

DSECT1 

DC 

A(DSECT2) 

DS 

24F 

DS 

0D 

DSECT2 

BC 

15,  RTNADR 

HIS  F  LG 

DS 

C 

MYFLAG 

DS 

C 

SNSFLG 

DS 

C 

SENSE 

DS 

C 

DEVID 

DS 

F 

PCHCCW 

DC 

A(SAVCCW) 

SAVPUN 

DS 

80  C 

PUNCH  ST 

LM 
SVC 
MV  I 
SVC 
MV  I 
ST 

BCTR 

EX 

BC 

SAVDAT  MVC 


6,  PUNCCW+4 
0,  2,  PUNLST 
STIO 

MYFLAG,  0 
WAIT 
HIS  F  LG,  0 
6,  SAVCCW+4 
6,  0 

6,  SAVDAT 
15,  READTP 
SAVPUN(0),  BUFFER 
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Program  Description: 


The  structure  of  the  card  unit  check  and  punch  unit  exception  routines  is  straight 
forward  and  should  be  easily  followed  from  the  flow  diagram  given  in  Figure  2.  The 
following  notes  help  to  explain  the  organization  of  the  routines. 

1.  Separate  entries  are  maintained  for  the  unit  check  return  resulting 
from  a  Read,  No-Feed  command  and  from  a  Feed,  Select  Stacker  command  for  two 
reasons: 


a.  Unit  checks  for  a  Feed,  Select  Stacker  command, 

if  they  occur,  can  occur  only  during  the  initial  selection 
sequence;  and  indication  of  unit  check  for  such  a  com¬ 
mand  at  other  than  initial  selection  is  treated  as  a 
machine  error  (see  IOACC). 

b.  A  Feed,  Select  Stacker  command  is  invalid  as  the 
first  command  following  initial  run-in  on  the  card 
reader;  thus,  a  dummy  Read,  No-Feed  command  must 
be  executed  if  the  possibility  of  executing  the  command 
after  initial  run-in  exists  (see  DUMRED). 

2.  The  WTO  (write  to  operator)  subroutine  contains  a  provision  for 
automatically  prefacing  a  message  by  the  card  reader  or  punch  identification  if  more 
than  one  card  reader  or  punch  is  attached  to  the  system. 

3.  All  combinations  of  status  bits  are  evaluated;  no  status  bits  are 
ignored.  In  general,  the  appearance  of  a  bit  in  the  sense  byte  which  should  never  be 
set  is  treated  as  a  machine  error. 

4.  Interpretation  of  the  reasons  for  task  termination  because  of  a  unit 
check  machine  or  program  error  is  accomplished  by  using  the  console  printout  of  the 
second  word  of  DSECT2.  For  each  point  on  the  flow  chart  indicating  a  branch  to  MERR, 
the  bits  set  in  HISFLG,  MYFLAG,  SNSFLG  and  SENSE  form  a  unique  combination.  The 
flow  chart  can  thus  be  used  to  determine  the  cause  of  the  error. 


IV.  D.  2- 10 


Figure  IV.  D.  2-2.  Flow  Diagram  of  CARDUC. 
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Save  GR's 
Set  Base  GR's 
Set  REDBIT 


CDPNUC 

I 


Save  GR’s 
Set  Base  GR's 
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CDPNUE 

Save  GR's 
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Set  PUNBIT 
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INITRJ 
Set  INBIT 
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C 
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H 
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IOACC 


1 

r 

ICLEAR  INIBIT  \ 

•J 

t 

C  PUNBIT 

c- 

n 

JPIOAC 


C 


STKBIT  =  1  ? 


X  N 


I> 


-MMERR 


Unused  Bits?  ^^^'||meRR^^ 

N 

C-. - st_ _ 

Bus  Out,  Int.  Req.?  J  ■■  >|mERr"^> 


^  Unusual  Card  Seq.  ? 

V  1  fJ-L— 

I  UNUTUL 


Binary  Card? 

„  (BINBIT  = 

=  1?) 

J 

{  N 

C 


User  expected? 
(USLBIT  =  1?) 


I 


<  SPCWT  > 
y 

"P 


Restore  GR's 


c 


I 


WTO 

"Invalid  EBCDIC 
Character.  Convert 
and  re-read  card" 


SVC  SAVSKP 


3 


Set  CC  =  3 

jT — 1 


User  wants,  \-Y 

W/msg:  I  1 

-fDMSBLT  =  1?  1  J  I - * 
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RESTR 


DUMRED 


I  Restore  GR's 
SVC  RESTOR 


SPCWT 


V 

SVC  SPECWT 

HEX  normal  no 

1 - ^ - 1 

ImerrJ 

SVC  SAVE 

SVC  DELETE 

—  -  J - 

RTRN 


WTO 


'TERR 


PERR 


_ 0k _ 

Set  up  message 

Set  up  message 

CKDVID 

"MACHINE  ERROR" 

t 

"PROGRAM  ERROR" 

Set  up  message 
'READER  RDRn"  or 
’PUNCH  PCHn" 
in  DSECT1 

i 

Move  original 
message  in  DSECT1 


Set  up  message 
’’CARD  UNIT  STATUS" 
"CARD  PUNCH  STATUS" 
unpack  and  translate  2nd  word 

_ i  if 


TffiFf,T2 
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Lincoln  Laboratory  Multi -Programming  Supervisor 
Subroutine  Writeup 
Tape  Unit  Check  Routines 
1  April  1966 


General  Information: 

The  tape  unit  check  routine  TAPEUC  attempts  to  recover  from  all  causes  of  tape 
unit  checks.  The  routine  is  entered  by  defining  one  or  both  of  its  entry  points  as 
EXTRN's  in  a  job  program  and  using  the  entry  address  as  the  unit  check  return  in  the 
returns  list  of  a  tape  I/O  operation.  The  entry  points  are  TPRDUC  and  TPWRUC  for 
tape  reading  and  writing  respectively.  The  routine  appears  transparent  to  the  job 
program  if  the  error  recovery  procedures  are  successful.  If  they  are  not  successful 
in  recovering,  the  routine  returns  with  the  condition  code  set  to  indicate  the  error  or 
terminates  the  job. 

Operating  Instructions: 

Three  types  of  messages  can  be  written  by  the  tape  unit  check  routine.  The 
first  type  requires  operator  action  and  is  written  when  the  tape  unit  is  not  ready.  This 
situation  is  transparent  to  the  calling  routine  and  is  recoverable  when  the  unit  is  made 
ready.  The  second  type  of  message  reflects  a  condition  caused  by  an  operation  proce¬ 
dure.  The  task  is  terminated  but  can  usually  be  reinitiated  after  some  appropriate  pro¬ 
cedure  is  followed.  The  third  type  of  message  indicates  that  a  permanent  error  has 
occurred  and  either  the  responsible  system  programmer  or  the  IBM  customer  engineer 
should  be  notified. 

I.  Operator  Action  Message 

1.  TAPE  Txxx  NOT  READY 

When  the  tape  unit  is  made  ready,  the  task  continues. 

II.  Operator  Procedure  Messages 

2.  TAPE  Txxx  PERM  DATA  CHECK 

This  message  is  written  when  a  permanent  read  or  write  error  occurs 

and  the  recovery  procedure  is  unsuccessful.  The  task  is  terminated. 
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3. 


TAPE  Txxx  END  OF  REEL 


This  message  is  written  during  a  write  operation  when  the  end-of-tape 
marker  is  reached  while  the  tape  is  being  erased  to  pass  over  bad  tape. 

The  end-of-tape  condition  is  indicated  by  a  unit  exception  on  the  erase 
gap  (ERG)  operation.  The  end-of-tape  condition  during  a  successful 
write  operation  is  indicated  by  a  unit  exception  on  the  write  operation 
and  the  unit  exception  return  will  be  taken.  If  this  message  is  written, 
the  task  will  be  terminated. 

4.  TAPE  Txxx  IS  FILE  PROTECTED 

If  an  attempt  is  made  to  write  on  a  tape  unit  which  is  file  protected, 
the  above  message  is  written  and  the  task  is  automatically  terminated. 

5.  NON-EXISTENT  TU 

This  message  should  not  occur,  but  if  it  does  the  responsible  system 
programmer  or  the  IBM  customer  engineer  should  be  notified.  This 
message  might  well  be  printed  if  the  tape  unit  is  physically  disconnected 
from  the  system. 

III.  Permanent  Error  Messages 

The  information  in  the  following  two  messages  contains  a  stop  code, 
the  condition  code  from  the  sense  command  (cc),  and  the  six  sense  bytes,  in  hexa¬ 
decimal,  from  the  sense  command  (ssssssssssss). 

6.  PROGRAM  ERROR  1  SENSE  DATA  TAPE  Txxx  ccssssssssssss 

This  message  is  printed  when  the  sense  bytes  after  a  reading  operation  are 
all  zero.  This  may  be  caused  by  a  calling  program  command  which  back¬ 
spaces  to  load  point.  The  responsible  system  programmer  should  be  notified. 
Other  programming  errors  might  occur  which  are  indicated  as  a  machine 
failure. 


7.  MACHINE  FAILURE  e  SENSE  DATA  TAPE  Txxx  ccssssssssssss 

When  this  message  is  printed,  the  single  character  stop  code  (e)  indicates  the 
cause  of  the  error.  The  codes  indicated  by  an  asterisk  (*)  might  occur  more 
frequently  than  the  others  and  the  responsible  system  programmer  should  be 
notified.  On  the  other  machine  failure  conditions  the  IBM  customer  engineer 
should  be  notified.  The  stop  codes  for  the  machine  failure  messages  are 
listed  below: 
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Stop  Code: 


Meaning: 


0  Sense  flag  not  equal  to  1  on  TPRDUC.  The  sense  bytes  may  not 
be  meaningful. 

2  Overrun  on  unit  after  five  retries . 

3  Bus -out  check  (not  on  initial  selection)  after  one  retry7. 

4  Permanent  Bus -out  check  on  initial  selection  after  one  retry. 

5  Equipment  check.  May  occur  when  tape  is  reset  during  an  operation. 

6  Equipment  check.  Clock  or  other  serious  error. 

7  Converter  check  on  TPRDUC  operation.  A  converter  check  occurs 
from  a  7-track  unit  if,  during  a  read  operation  with  converter  on,  the 
number  of  characters  read  cannot  be  stored  in  an  integral  number  of 
bytes.  This  might  be  a  programming  error. 

8  Intervention  required  but  not  on  initial  selection. 

9  Sense  flag  not  equal  to  1  after  initial  rejection  of  a  command  for  a 
TAPEUC  backspace  record  operation. 

A  Permanent  bus -out  check  during  a  backspace  record  operation. 

B  Sense  flag  not  equal  to  1  after  initiation  of  a  TAPEUC  backspace 
record  operation. 

C  Unused  sense  bytes  set  during  TAPEUC  backspace  record  operation 
serious  I/O  error. 

D  Zero  sense  bytes  but  tape  not  at  load  point. 

E  Sense  flag  not  equal  to  1  after  initial  rejection  of  a  command  for  a 

TAPEUC  forward  space  record  operation. 

F  Permanent  bus -out  check  during  a  forward  space  record  operation. 

G  Sense  flag  not  equal  to  1  after  initiation  of  a  command  for  a  TAPEUC 
forward  space  record  operation. 
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Stop  Code: 


Meaning: 


H  Sense  Status  A  =  Status  B.  Serious  machine  error. 

I  Non-existent  tape  unit.  This  message  follows  message  5. 

J  Sense  flag  not  equal  to  1  on  TPWRUC.  The  sense  bytes  may  not 

be  meaningful. 

K  Sense  bytes  on  TPWRUC  indicate  a  condition  other  than  intervention 
required  or  Bus -out  check  on  initial  selection.  Serious  error. 

L  Unused  sense  bits  set  after  a  TPWRUC  operation. 

M  Zero  sense  bytes  after  a  TPWRUC  operation. 

N  Command  reject  from  a  TPWRUC  operation  but  tape  is  not  file 
protected.  This  might  be  a  programming  error. 

O  Sense  flag  not  equal  to  1  after  an  initial  rejection  of  a  ERG 
command. 

P  Permanent  bus -out  check  during  an  ERG  operation. 

Q  Sense  flag  not  equal  to  1  after  initiation  of  an  ERG  command. 

R  Unit  check  with  other  than  an  equipment  check  or  data  check 

condition  on  an  ERG  command  during  a  TPWRUC  operation. 
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Programming  Instructions: 

This  routine  handles  tape  unit  checks  for  two  types  of  commands: 

1 .  Tape  reading  (entry  point  TPRDUC) 

2.  Tape  writing  (entry  point  TPWRUC). 

Linkage  from  the  calling  program  requires  that  the  entry  point  address,  which  has  been 
defined  as  an  EXTRN  in  the  calling  program,  be  defined  as  the  unit  check  return  in  the 
returns  list  of  a  SVC  STIO.  The  calling  program  must  also  initialize  general  register 
13  to  point  to  a  double-word  aligned  storage  area,  DSECTl,  depicted  in  Figure  IV.  D.  3-5. 
first  word  in  DSECTl  must  point  to  a  second  double-word  aligned  storage  area,  DSECT2, 
as  illustrated  below.  DSECTl  is  used  as  a  work  area  by  the  unit  check  routine  and 
must  be  80  bytes  long  for  tape  reading  and  88  bytes  long  for  tape  writing.  DSECT2 
contains  parameters  used  by  the  routine  and  is  5  words  (20  bytes)  long. 

GR  13  contains  the  address  of  DSECTl 


DSECTl 


Ireading 


20  words  22  words 
.for  tape  ior  tape 


writing 


4  bytes 


DSECT2 


RTNADR 

OR 

OC 

00 

SNSFLG 

SENSE 

BYTES 

FROM 

SUPER 

FLAG 

TEMP 

DEVICE  ID 

1 


5  words 


Figure  IV.  D.  3-1.  DSECTs  used  in  tape  unit  check  routine. 


The 
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If  any  of  the  unit  check  return  options  are  selected  by  the  FLAG  bits,  the  calling 
program  must  place  the  return  address  into  the  first  word  of  DSECT2.  RTNADR  is 
the  location  in  the  calling  program  to  which  control  will  be  returned  with  the  condition 
set  to  indicate  the  cause  of  the  return.  This  full  word  in  DSECT2  must  be  reserved 
even  if  the  calling  program  does  not  use  any  of  the  options. 

The  "retry"  count,  R,  specifies  the  number  of  times  the  operation  is  retried  on 
an  error  condition  and  the  "cleans"  count,  C,  specifies  the  number  of  times  the  tape 
cleaning  procedure  is  performed.  After  each  cleaning  procedure,  the  operation  may 
be  retried  the  number  of  times  specified  by  the  retry  count.  The  maximum  number  of 
retries  or  cleans  is  15. 

The  SNSFLG  and  SENSE  byte  areas  .  are  used  by  the  supervisor  to  provide  sense 
information  to  the  unit  check  routine.  Prior  to  issuing  the  first  SVC  STIO,  the  location 
of  the  SNSFLG  byte  must  be  passed  to  the  supervisor  via  an  SVC  SNSADR  to  initiate 
automatic  sensing  for  the  tape  operation.  SVC  GETID  must  also  be  issued  and  the 
device  ID  obtained  placed  in  the  fifth  word  of  DSECT2. 

The  FLAG  byte  is  used  to  select  unit  check  routine  options.  Bits  5,  6,  and  7 
indicate  whether  the  TAPEUC  routine  should  return  to  the  calling  program  on  an  abnormal 
unit  check  condition  or  if  the  job  should  be  terminated.  If  an  abnormal  unit  check  condi¬ 
tion  occurs  and  the  appropriate  FLAG  bit  is  set,  the  routine  returns  to  the  calling  pro¬ 
gram  with  the  condition  code  set  to  indicate  the  cause  of  the  error. 

The  meaning  of  the  FLAG  bits  (numbered  0-7  from  left  to  right)  and  the  condition 
code  setting  on  return  from  the  unit  check  routine  are  summarized  and  described  below. 

If  a  bit  is  not  set  and  the  indicated  abnormal  unit  check  condition  occurs,  the  indicated 
message  will  be  printed  and  the  task  terminated. 

On  Reading 

bits:  01234567  Condition  Code:  Message: 

4  -  position  tape  at  beginning  of  error  record  on  permanent  read  error 

5  -  permanent  read  error  1  2 

6  -  converter  check  2  7 

7  -  equipment  check  and  not  ready  together  3  7 

On  W  riting 

bits:  01234567  Condition  Code:  Message: 

5  -  permanent  write  error  1  2 

6  -  end  of  tape  reached  2  3 

7  -  equipment  check  and  not  ready  together  3  7 
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When  a  permanent  read  error  occurs,  the  tape  can  be  positioned  either  before  or 
after  the  record  in  error.  This  is  determined  by  the  setting  of  bit  4.  If  bit  5  is  set  and 
the  recovery  procedure  for  a  redundancy  error  is  unsuccessful,  a  return  will  be  made 
to  the  calling  program  with  condition  code  1;  if  bit  5  is  not  set,  message  1  will  be  printed 
and  the  task  terminated. 

If  bit  4  is  set,  the  tape  will  be  positioned  at  the  beginning  of  the  record  which 
caused  an  unrecoverable  error  condition  before  return  is  made  to  the  calling  routine. 

If  the  bit  is  off,  the  tape  will  be  positioned  after  the  bad  record.  If  a  job  is  to  change 
modes  after  reading  a  record  in  error,  then  bit  4  should  be  set. 

If  bit  5  or  6  is  not  set  and  the  indicated  abnormal  unit  check  condition  occurs, 
the  appropriate  message  is  printed  and  the  task  is  terminated.  If  bit  5  or  6  is  set 
and  the  indicated  abnormal  unit  check  condition  occurs,  a  return  is  made  to  the  calling 
program  with  the  appropriate  condition  code  set. 

An  equipment  check  and  not  ready  condition  occurring  together  indicates  that  the 
tape  became  not  ready  while  a  reading  or  writing  operation  was  in  progress  and  the 
position  of  the  tape  is  uncertain.  If  bit  7  is  set  and  the  tape  unit  becomes  not  ready 
during  an  operation,  the  not  ready  message  will  be  printed  and  when  the  tape  is  made 
ready,  a  return  will  be  made  to  the  calling  routine  with  the  condition  code  set  to  3. 

If  bit  7  is  not  set  and  the  tape  unit  becomes  not  ready  during  an  operation,  the  equip¬ 
ment  check  message  will  be  printed  out  and  the  task  will  be  terminated. 

The  byte  shown  as  TEMP  is  used  and  altered  by  the  unit  check  routine  but  may 
also  be  used  by  the  calling  routine. 

Before  each  SVC  WAIT  for  a  tape  operation,  general  register  13  must  point  to 
DSECT1  and  the  retry  count,  clean  count,  and  zero  byte  (byte  after  clean  count)  must  be 
reset.  The  TAPEUC  routine  does  not  alter  any  GR's  including  GR  13,  except  when  a 
return  to  RTNADR  on  an  abnormal  unit  check  condition  is  made,  GR  13  will  be  altered. 

Error  Recovery  Procedures: 

The  tape  unit  check  routine  tries  to  recover  from  an  error  condition  (data  check) 
whenever  possible.  The  retry  procedure  for  a  reading  error  consists  of  backspacing 
over  the  error  record  and  rereading  the  record.  The  retry  procedure  for  a  write  error 
consists  of  backspacing  over  the  error  record,  skipping  tape  for  a  length  of  3-1/2  " 

(using  the  erase  record  gap  command)  and  then  rewriting  the  record.  The  number  of 
times  the  above  retry  procedure  is  performed  is  specified  by  the  "retry"  count  parameter 
of  the  unit  check  routine.  If  successive  retries  do  not  eliminate  the  error,  the  tape  can 
be  made  to  pass  through  the  cleaning  heads  of  the  tape  unit.  This  is  performed  after  the 
last  retry  by  backspacing  the  tape  5  records  and  then  forward  spacing  the  tape  4  records. 
This  procedure  repositions  the  tape  after  the  last  good  record  or  at  load  point.  The 
number  of  times  the  cleaning  procedure  is  performed  is  specified  by  the  "cleans"  count 
parameter  of  the  unit  check  routine.  After  each  cleaning  procedure,  the  operation 
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may  be  retried  the  number  of  times  specified  by  the  retry  count.  The  maximum  num¬ 
ber  of  retrys  or  cleans  is  15. 

It  should  be  noted  that  before  each  retry  on  a  write  operation  the  tape  is  spaced 
forward  3-1/2  Thus,  after  10  retries  35  inches  of  blank  tape  will  have  been  spaced 
over. 

When  recovery  from  a  permanent  error  fails,  the  tape  is  positioned  beyond  the 
last  good  record  after  a  write  operation  and  is  positioned  either  before  or  after  the 
record  in  error  after  a  read  operation.  The  tape  is  positioned  after  the  record  in 
error  on  a  read  operation  if  flag  bit  4  was  not  set  and  is  positioned  before  the  record 
in  error  if  flag  bit  4  was  set.  If  a  job  is  to  change  modes  after  reading  a  record  in 
error,  then  flag  bit  4  should  be  set. 

Sample  Program: 

An  example  of  the  use  of  the  tape  unit  check  routine  is  illustrated  by  the  sample  coding 
below,  which  uses  the  tape  read  unit  check  entry.  The  number  of  REREAD's  is  equated 
to  8  and  the  number  of  CLEANS  is  equated  to  2. 


EXAMPL  START  0 

EXTRN  TPRDUC 


or  TPWRUC 


LA 

LA 

SVC 

SVC 

ST 


0,  LDN 


1,  SNSFLG 


SNSADR 

GETID 


Set  up  automatic  sense 

Get  the  device  ID 

Store  device  ID  for  TAPEUC 


0,  DEVID 


LA 

ST 

LA 

ST 

MVI 


13,  DSECT2  First  word  of  DSECT1  work  area  con- 

13,  DSECT1  tains  address  of  TPRDUC  parameters 

13,  RTNADR  Set  return  address  in  parameter  area 
13,  DSECT2 


FLAG,  BITS  Set  flag  bits 


LA 

LA 

LA 

MVC 

SVC 

SVC 


STIO 

WAIT 


0,  LDN 
2,  RTNLST 

13,  DSECT1  Set  GR13 

COUNT(3),  COUNTS  Initialize  count  before 


all  reads  or  writes 
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RTNLST 

DS 

F 

DC 

A(UE) 

Unit  exception  return 

DC 

A(TPRDUC) 

Unit  check  return 

•  •  • 

DS 

OD 

DSECT1 

DC 

APSECT2) 

Work  area  for  TAPEUC 

DS 

19F 

Work  area  for  TPRDUC 

•  .  . 

(DS  2 IF  for  TPWRUC) 

DS 

OD 

DSECT2 

DC 

A(RTNADR 

Parameters  for  TPRDUC  or  TPWRUC 

COUNT 

DS 

3C 

SNSFLG 

DS 

C 

SENSE 

DS 

6C 

FLAG 

DS 

C 

TEMP 

DS 

C 

DEVID 

DS 

F 

COUNTS 

DC 

AL1  (REREAD)  No.  times  record  should  be  reread 

DC 

ALl(CLEANS)  No.  times  tape  should  be  cleaned 

DC 

AL1(0) 

This  byte  must  be  zero 

REREADS 

EQU 

8 

Must  be  less  than  16 

CLEANS 

EQU 

2 

Must  be  less  than  16 
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Lincoln  Laboratory  Multi -Programming  Supervisor 
Subroutine  Write-Up 

Printer  Unit  Exception  and  Unit  Check  Routine 


General  Information: 

The  printer  unit  exception  and  unit  check  routine  is  entered  by  defining  one 
or  both  of  its  entry  points  as  EXTERN’S  in  a  calling  program  and  using  the  entry 
address  as  a  unit  exception  return  and/or  a  unit  check  return  in  the  returns  list  of 
a  SVC  STTO  for  the  printer.  A  unit  check  indicates  that  the  printer  or  its  controls 
require  program  or  operator  intervention.  A  unit  exception  indicates  that  a  hole 
has  been  sensed  in  Channel  12  of  the  carriage  control  tape.  The  entry  points  are 
PRTUE  (unit  exception)  and  PRTUC  (unit  check). 

The  printer  unit  exception  and  unit  check  routine  is  explained  in  three  parts: 

1.  Operating  instructions  describing  console  messages 
produced  by  the  routine  and  required  operator  actions. 

2.  Programming  instructions  describing  how  to  use  the 
routine  in  writing  programs. 

3.  Program  description  including  a  flow  chart  of  the  routine. 

Operating  Instructions: 

The  printer  unit  exception  and  unit  check  routine  writes  two  types  of  messages. 
The  first  type  requires  operator  intervention  indicating  that  the  printer  is  not  ready 
resulting  from  one  of  the  following:  (1)  a  sync  check,  (2)  an  end -of -forms  condition, 

(3)  a  forms  check,  (4)  an  opened  mechanical  interlock,  or  (5)  the  stop  key  being  pressed. 
The  second  type  indicates  that  a  permanent  error  has  occurred  and  the  task  terminates. 
The  operator  should  then  notify  either  the  IBM  customer  engineer  or  the  responsible 
system  programmer. 

I:  Operator  Action  Messages 

These  messages  are  in  two  forms,  depending  on  the  number  of  printers 
attached  to  the  system.  If  there  is  more  than  one  printer,  the  message  is 
preceded  by  the  printer  identification,” PRINTER  PTRn”.  If  there  is  only  one 
printer,  the  message  appears  by  itself. 

1.  PRINTER  NOT  READY 

This  message  indicates  that  the  printer  ready  light  is  not 
on  due  to  the  occurrence  of  one  of  the  above  mentioned  conditions. 

The  task  continues  when  the  printer  is  made  ready. 
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II:  Permanent  Error  Messages 

There  are  two  types  of  permanent  error  messages,  one  involving 
a  program  error  in  which  case  the  system  programmer  should  be  notified, 
and  the  other  involving  machine  malfunction  in  which  case  the  customer 
engineer  should  be  notified.  The  task  terminates  on  any  permanent  error 
condition.  The  status  information  is  displayed  and  consists  of  three  bytes 
of  hexadecimal  information  from  the  routine  (see  Programming  Instructions). 
The  meaning  of  the  bytes  are  as  follows: 

sc  stop  code 

sf  sense  flag  SNSCC 

sb  printer  sense  byte  SENBYT 

The  status  information  is  preceded  by  the  printer  identification. 

—  if  only  one  printer  attached  to  system 

PTRn  if  more  than  one  printer  is  attached. 

2.  PRINTER  EQUIPMENT  CHECK 

MACHINE  FAILURE  PRINTER  SENSE  DATA - scsfsb 

A  printer  equipment  check  has  occurred  after  one  retry 
attempt.  Despite  the  equipment  check,  the  line  of  information 
is  printed.  The  routine  writes  the  message,  "ABOVE  LINE 
PRINTED  UNDER  MACHINE  MALFUNCTION",  on  the  printer. 

3.  BUS-OUT  CHECK 

MACHINE  FAILURE  PRINTER  SENSE  DATA - scsfsb 

A  bus -out  check  has  occurred  after  one  retry  attempt. 

Despite  the  bus -out  check,  printing  is  not  suppressed.  The 
routine  writes  the  message,  "ABOVE  LINE  PRINTED  UNDER 
MACHINE  MALFUNCTION",  on  the  printer. 

4.  PROGRAM  ERROR  PRINTER  SENSE  DATA - scsfsb 

The  responsible  system  programmer  should  be  notified 
when  this  message  is  printed  on  the  console  typewriter. 
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The  stop  codes  for  the  machine  failure  and  program  error  messages  are  listed 


below: 

Stop  Code 

0 

1 

2 

3 

4 

5 

6 

7 

8 
9 
A 
B 


Meaning 

Sense  flag  not  equal  to  i  on  PRTUC 

Unused  bits  set  in  sense  byte.  Machine  error. 

Equipment  check. 

Intervention  required 

Bus -out  check  (not  on  initial  selection)  after  one  retry. 

Bus -out  on  initial  selection  after  one  retry. 

Channel  9  check. 

Command  reject  on  initial  selection.  Program  error. 
Command  reject  (not  on  initial  selection).  Program  error. 
Unit  check  on  attempting  to  write  a  message  on  the  printer. 
Unit  exception  on  SVC  SPWAIT. 

Unit  check  on  eject  page  command. 
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Programming  Instructions: 


The  routine  handles  both  printer  unit  exceptions  and  printer  unit  checks.  Linkage 
from  the  calling  program  requires  placing  the  proper  entry  point  address  PRTTJE,  which 
has  been  defined  as  an  EXTRN  in  the  calling  program,  into  the  returns  list  as  the  unit 

exception  address;  and  the  entry  point  address  PRTUC,  which  also  has  been  defined  as  an 
EXTRN  in  the  calling  program,  into  the  returns  list  as  the  unit  check  address.  The  calling 
program  must  also  initialize  general  register  13  to  point  to  a  double  word  aligned  storage 
area  DSECT1,  depicted  in  Fig.  IV.  D.  4-1.  The  first  word  in  DSECT1  must  point  to  a  sec¬ 
ond  double-word  aligned  storage  area  DSECT2,  also  shown  in  Fig.  IV.  D.  4-1.  DSECT1  is 
used  as  a  work  area  by  the  routine  and  must  be  80  bytes  long.  DSECT2  contains  the  param¬ 
eters  used  by  the  routine  and  is  16  bytes  long.  GR  13  contains  the  address  DSECT1. 


SECTl- 


20  words 


ECT2- 


4  bytes- 


BC  15,  RTNADR 

FLAG 

MYFLAG 

STOPCD 

SNSCC 

SENBYT 

UNUSED 

DEVICE  ID 

4  words 


Fig.  IV.  D.  4-1.  DSECTs  used  in  printer  unit  exception  and  unit  check  routine. 
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If  any  unit  exception  or  unit  check  return  option  is  selected,  the  calling  program 
must  place  the  assembled  instruction  ”BC  15,  RTNADR"  into  the  first  word  of  DSECT2. 
RTNADR  is  the  location  in  the  calling  program  to  which  control  can  be  returned  with  the 
condition  code  set  to  1  on  a  Channel  9  check  or  set  to  3  on  a  Channel  12  check.  This  full 
word  in  DSECT2  must  be  reserved  even  if  the  calling  program  does  not  use  the  option. 

The  second  word  contains  four  bytes  of  information.  The  FLAG  byte  contains 
information  passed  from  the  calling  program.  The  FLAG  byte  is  used  to  select  the 
printer  unit  exception  and  unit  check  options  and  is  not  altered  by  the  routine.  The 
meaning  of  the  FLAG  bits  (numbered  0-7  from  left  to  right)  are  as  follows: 

Bits:  01234567 

5  -  If  this  bit  is  set,  a  page  is  ejected  when  a  hole  is  sensed  in 

Channel  9  of  the  carriage  control  tape  during  a  carriage  space 
operation.  If  this  bit  is  not  set,  no  ejection  occurs. 

6  -  If  this  bit  is  set,  a  page  is  ejected  when  a  hole  is  sensed  in 

Channel  12  of  the  carriage  control  tape  during  a  carriage  space 
operation.  If  this  bit  is  not  set,  no  ejection  occurs. 

7  -  When  this  bit  is  set,  a  return  is  made  to  the  job  program  on  a 

check  condition.  The  condition  code  is  set  to  1  on  a  Channel  9 
check  or  set  to  3  on  a  Channel  12  check.  If  this  bit  is  not  set, 
the  program  continues  normally. 

These  bits  must  all  be  set  or  cleared  by  the  program  as  desired.  The  MYFLAG 
and  STOPCD  bytes  are  used  by  the  routine  and  must  be  cleared  prior  to  each  SVC  WAIT 
issued  for  the  printer  in  the  calling  program. 

The  SNSCC  and  SENBYT  bytes  are  used  by  the  supervisor  to  provide  sense 
information  to  the  routine.  The  location  of  the  SNSCC  byte  must  be  passed  to  the 
supervisor  via  an  SVC  SNSADR  to  initiate  automatic  sensing  prior  to  issuing  the 
first  SVC  STIO  for  the  printer.  SVC  GETID  must  also  be  issued  and  the  device  ID 
obtained  and  placed  in  the  fourth  word  of  DSECT2. 

Sample  Program: 

An  example  of  the  use  of  the  printer  unit  exception  and  unit  check  routine  is 
shown  in  Fig.  IV.  D.  4-2.  The  sample  coding  uses  both  the  unit  exception  and  unit 
check  entries. 

Program  Description: 


The  flow  chart  of  the  printer  unit  exception  and  unit  check  routine  reveals  the 
structure  of  the  routine.  There  are  separate  entries  for  unit  exceptions  and  unit  checks. 

The  flow  chart  is  given  in  Fig.  IV.  D.  4-3. 
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SAMPLE 

START 

0 

EXTRN 

PRTUE 

EXTRN 

PRTUC 

•  •  • 

LA 

13,  DSECT1 

LA 

0,  LDN  Put  logical  device  number  of  the  printer  in 

LA 

1,  SNSCC  GRO  and  set  up  automatic  sensing 

SVC 

S  NS  ADR 

SVC 

GET1D  Get  device  ID 

ST 

0,  DEVID 

MV  I 

FLAG,  X’06'  Set  FLAG  bit  to  eject  the  page  on  a  Channel  ! 

. .  • 

a  Channel  12  check  and  continue  with  normal 

. .  . 

sequencing. 

PRINT 

LM 

0,  2,  PRTLST 

SVC 

STIO 

MVI 

MYFLAG,  X*00’  Clear  MYFLAG 

MV  I 

STOPCD,  X'00’  and  STOPCD 

SVC 

WAIT 

PRTLST 

•  •  • 

DC 

F’T 

DC 

A(PRTCCW) 

DC 

A(RTNLST) 

RTNLST 

•  •  • 

DS 

F 

DC 

A  (PRTUE) 

DC 

A  (PRTUC) 

•  •  • 

DS 

0D 

DSECT1 

DC 

A(DSECT2) 

DS 

19F 

•  •  • 

DS 

0D 

DSECT2 

BC 

15,  RTNADR 

FLAG 

DS 

C 

MYFLAG 

DS 

C 

STOPCD 

DS 

C 

SNSCC 

DS 

C 

SENBYT 

DS 

F 

DEVID 

DS 

F 

Fig.  IV.  D.  4-2.  Sample  code  showing  the  use  of  the  PRNTUC  routines. 
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PRTUC 


PRTUE 


Fig.  IV.  D.  4-3.  Flow  diagram  of  PRNTUC 
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EQUIP 


INTREQ 


LINKGR.  WRTMSG 


WRTMSG 
Write  Message  "Printer 
Not  Ready" 


BAL 


LINKGR.  SPCWT 


SPCWT 
Wait  for  Printer 


(iNIBIT  Set] 

L 

No 

Restor  GR’s 
SVC  SKIP 

> 

Yes  n,  lRETURN> 


INIBUS 


Set 

STOPCD  =  5 


(  INBIT  Set  ? 

1 

Bus 

-out  In  \ 

attempting  to  1 

L  eject  page  ?  / 

No 

I  Has  Operation 

\  Been  Retried?, 

No 

BAL 

LINKGR.  P 

/  PRTMSG 

Isa 


Yes 


Yes 


Message  on  Printer 
"Above  Line  Printed 
Under  Machine  Mal¬ 
function" 

I z: 


Set  Retry 
BIT 


I  INIBUS> 


|MERR  > 


ITPMSG2  > 


^ —  RETURN> 


(  Has  OperatiorA 

Set  Retry 

\Been  Retried?  /  ' 

BIT 

Yes 

ITPMSG2J 

Fig.  IV.  D.  4-3.  Flow  diagram  of  PRNTUC.  (Cont. ) 
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Fig.  rv.  D.  4-3.  Flow  diagram  of  PRNTUC.  (Cont. ) 
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SPCWT 


RETURN 


WRTM S£ 


/ - - \Y 

(Is  DEVID  =  —U- 

IT 


Yes 


Set  up  Message 
"Printer  PTRN" 
Followed  by  original 
Message  in  DSECT1. 


£ 


T 


;vc  write! 


Save  GR's 
SVC  RESTOR 


TPMSG1 


_ > 

- 

La 
Me 
Eqi 
in  ( 
Loi 

in  ( 

id  Address  of 
ssagp  "Printer 
lipment  Check" 

3R1 

id  Message  Length 
jRO 

t 


BAL  LINKGR,  WRTMSG 


JmerrJ 


PRTMSG 


Issue  Command 
to  Print  Message 
"Above  Line  Printed 
Under  Machine 
Malfunction"  on 
Printer 


UEX 


JZ 

(merr) 


NORMAL  UC 

Set  STOPCD  =  9  IMERIU 
BC  15,  LINKGR) 


TPMSG2 


Fig.  IV.  D.  4-3. 


Flow  diagram  of  PRNTUC. 


(Cont. ) 
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Lincoln  Laboratory  Multi- Programming  Supervisor 
Subroutine  Write-Up 
Find  Job  List  Subroutine 
1  June  1966 


General  Information: 

The  re-entrant  system  subroutine,  FJBLST,  looks  for  a  job  list  entry  (name 
of  and  entry  to  an  LLMPS  job  program)  in  the  supervisor  table  JOBLST. 

Upon  entering  the  routine,  FJBLST  expects  a  job  number  in  GRO  and  the  address  of 
a  job  name  in  GR1.  If  FJBLST  is  successful  in  locating  the  job  list  entry,  it  returns  the 
location  of  the  job  list  entry  in  GR2  and  sets  the  condition  code  to  1,  indicating  a  non  re¬ 
entrant  job,  or  to  3,  indicating  a  re-entrant  job.  If  FJBLST  is  unsuccessful,  it  returns 
with  the  condition  code  set  to  0. 

Calling  Sequence: 

The  user  must  define  the  FJBLST  routine  as  an  external  symbol  in  his  program 
and  call  it  by  a  BALR  14,  15  instruction  where  GR15  is  loaded  to  contain  the  address  of 
the  FJBLST  routine. 

General  register  14  and  15  must  be  preset  prior  to  entering  FJBLST.  GR14 
is  used  as  the  return  register  to  the  calling  program  and  GR15  is  used  as  the  base 
register. 

SAMPLE  Program: 

An  example  of  the  use  of  FJBLST  is  shown  below: 


CHGBUF 

START 

0 

EXTRN 

• 

FJBLST 

SUBRTN 

• 

• 

L 

0,  JOBNUM 

LA 

1,  JOBNME 

L 

15,  ADFJBL 

BALR 

14,  15 

TSTCC 

BC 

8,  NOTFND 

Job  not  found  in  job  list 

BC 

4,  OKAY 

Job  found  in  job  list 

BC 

1,  OKAY 

Re-entrant  job  found  in  job  list 

OKAY 

L 

• 

• 

• 

2,  12(2) 

Address  of  job  (4th  word  in  job  list) 
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NOTFND 

SVC 

• 

EXIT 

ADFJBL 

• 

• 

DC 

A(FJBLST) 

JOBNUM 

DC 

F'O' 

JOBNME 

DC 

C'T7DUMP' 

task  0  indicates  job  not  active. 


Program  Description: 
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